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INTERFACE DE DISCO PARA EL SPECTRUM 

La mejor noticia para los poseedores de un Spectrum 


Al fin los usuarsos del Spectrum pueden 
lograr que su computador alcance la 
operatividad y vetocidad que sdlo el 
sistema operatsvo de disco puede 
proporcionar. 

Gran capacidad de almacenamiento, 
fulgurante acceso a los datos y mayor 
flexibilidad operativa. 


La respuesta para el usuario del 
Spectrum, 

El interface Beta Disk, se conecta detras de su 
Spectrum para proporcionar una compatibilidad 
mstantanea con cuaiquier unidad de discos tipo 
Shugart De hecho puede Vd. conectarlo al 
Interface 1 de Sinclair pudiendo operar 
indistinlamente el Microdrive y la unidad de 
discos en completa armonia. 


Cinta casette 


Sistema completo 


Es ienla y engorrosa y predispuesta a falios 
debidos a la desigual calidad de Ja cinta (En 
realidad, el casette no fue disefiado para ser 
usado en computadoras). 

Microdrive 

Son una solucibn al problems al ser mas rapidos 
PERO continuan basandose en sistemas 
de cinta 

La respuesta 


El interface Beta disk de Silog se suministra con 
todo lo necesario para conseguir. de forma 
inmediata, una rapida y eficiente puesta en 
marcha, Para ello, cada interface se acompafia 
con un disco de utilidades que le permitira, en 
forma exlremadamente sencilla, efectuar copias 
de discos enteros o de programas individuals 
de un disco a otro. Los comandos de SAVE y 
LOAD son totalmenie compatibles con el 
Microdrive y con el disco pudiendo diferenciar 
ambos de forma inequivoca. 




Una exclusive de: 

Sistemas Lagicos Gemna.SA 
Avria San Narciso, 24 (Gerona) 
17005-Tei (912)237100 


Las unidades de disco fueron especificamente 
disenadas para su aplicacibn en computadoras 
de forma que los datos puedan guardarse y ser 
leidos de forma segura y rapida. Ademas una 
unidad de discos emplea acceso aleatorio para 
obtener programas y datos de cuaiquier parte 
del disco sin tener que esperar seeuencialmenfe 
a que transcurran otros programas. 

La velocidad?. S6!o urtos segundos 


El interface Beta disk emplea soiamente 128 
bytes de memoria RAM de su Spectrum. 
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TRUCO PARA PONER 
UNA LINEA CERO 
EN UN PROGRAM A 


Seguramente nuestros 
lectores habran observado 
en algunos programas en 
BASIC qua estos tienen li¬ 
ne as cero que no se pueden 
editar, La forma de realizar 
este truco es muy fbcil. Lo 
primers que necesitamos es 
dveriguar la direccibn de la 
linea en memoria para cam 
biar su numero. Si hacemos 
PRINT PEEK 23635 + 256 * 
PEEK 23636 obtendremos 


un numero (23755 si no te ne¬ 
mos el interfaz 1 conectado) 
que nos da la dkeccibn en 
memoria de la primera linea 
del programa. Haciendo PO¬ 
KES con ceros en esta direc- 
cibn y en ia siguiente. deja- 
remos una hermosa linea 
cero que no puede ser edi- 
tada 

Asi, por ejemplo, en ei 
caso anterior bastard con 
hacer POKE 23755,® y PO¬ 
KE 23756,0 El mismo truco 
puede emplearse en cuai- 
Quier linea del programs que 
no sea la primera. a condi- 
cibn de conocer su direc¬ 
tion en la memoria 



?&HEXTi;R£TU(KTQ 

GaPfUAfTftt*. 9 CJ 
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HACIENDO UN INPUT 
EN MEDIO 
DE LA PANTALLA 


Muchos lectores nos han 
escrito preguntandonos si 
exists alguna posibilidad de 
hacer que la sentencia IN¬ 
PUT se imprima en cual- 
quier parte de la pantalla, y 
no necesariamente en la 
parte baja de la misma. co- 
mo ocurre normalmente. 
Pues bien. con un poco de 
picardia es perfectamente 
posible obtener este efecto 
como lo demuestra este pro- 
gramita. 


10 INPUT AT 22,0: AT 
0,0; NOMBRE’.NS 


Las posibiiidades que 
ofrece este truco son infini- 
tas. pero tiene un pequefto 
defecto que rbpidamente 
descubrirbn nuestros lecto¬ 
res. Una vez que bemos con- 
testado al INPUT. bste se bo* 
rra. Para evilarlo, podemos 
artadir esta line a que corre- 
gir& el defecto: 


20 PRINT AT 0,0;"NOM 

bre:n$ 


METER VARIABLES 
EN UN INPUT 


Les ofrece mos un Inter©* 
sante truquito para Imprlmir 
una variable denlro de un IN¬ 
PUT. Basta con utilizar el 
signo + para conectar un 
string con 9a variable que de¬ 


mos un ejemplo prbctico; 

NatureImente. podemos 
utilizar cualquier tipo de va¬ 
riable, norma} o matriz, siem- 
pre que sea alfanumerica. Si 
queremos imprimir una va 



10 LET AS = “PROG RAMA" 

20 INPUT "NOMBRE DEL‘+AS:B$ 


seemos imprimir. De esta 
forma, el Spectrum constru- 
ye. primero. el string antes 
de la impresibn y se const- 
gue el efecto deseado, Vea 


riable numerica. tendremos 
que utilizar la funcibn STRS 
para convertirla a a If a numb 
rica. 


{QUE PROGRAMA 
ES ESTE? 


Normalmente cuando vd, 
carga un programa apareee 
en la pantalla el clasico 
mensaje: xxxxx o bytes: 


zando cbdigos de control en 
el nombre del programa El 
ejemplo que sigue le aclara* 
rd algo 9as ideas: 



10 LET A$ = CHRS 22 + CHRS 1 + CHRS 


0 + CHRS 
17 + CRHS 
249 

20 SAVE A$ 


xxxxx. F^ro imaginese que 
comienza a cargar su pro¬ 
grama y no apanece nada en 
la pantalla. Este curioso 
efecto se puede lograr utili- 


16 + CHRS 7 + CHRS 
7 + CHRS 249 + CHRS 


Haga RUN. grabe el pro¬ 
grama resultante en una cin- 
ta e intente cargarlo des- 
pubs de haber tecleado 
NEW. 

£rt fsi# gggagio igf ribi^i n enan ca- 

bida IQ6 IruCO^ que n u e stros lecro- 
mg s quieran propwer _ _ 

Para elia, noltensn mds gupanyidr 

10& ppf coif op MICRO H OBB Y, 

DAr^Qb>sl>o Morc(Uc 24 f of. 3 y 4. 

MadrkJ-28029, 
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LOS programadores 



PACO SUAREZ, 

UN GENIO 
CON PROYECCION 
INTERNACIONAL 

Gabriel NIETO 

in una Centrica calle de Madrid se encuentra la sede de 
Cibernesis, la tom parti a de Paco Suarez, el famoso 
autor de «La Pulga», Alii, un equipo de programadares 
trabajan intansablemente preparando sus nuevos 
programas. 


El no tienc apenas mucblcs, la 
unica docoracitVii que eix'ontramos fuc la 
dc tmos ondenadores que trabajaban in 
eansablcmcnic, dirigidos por un grujxi dc 
personas que Kan hecho de Ja programa- 
ci6n una ineia en sus vidas. 

En la ofldna de Paco comenzaba una 
eni revista que ibn a iratar de averiguar 
aij!iiiu» aspectos escondidos dc la per¬ 
sonal id ad de e$te genio de la programa 
cion. 

Paco, antes de programador era disc- 
nail or. lo que quizes explique un poco 
mas el hecho de que sus prog ram as cs- 
icn coniruidos con un gusto exquisite. 
Sus com ten zo s fueron como el dc otros 
muchos. de la mano del ZX 81, Unos 
euantos I i bias y un feroz deseo de inves- 
ligacibn, k fueron introduciendo poco a 
poco on esic apasionante mundo. Cuan- 
do nos comaba como nacid La Pulga, 
quedamos real men tc sorprendidos. Ptaic- 
ec ser que lo que esiaba intemando en 
real id ad era cxplicarle a su her mano ed 
mo sc podia hacer una parabola, y at ver 
I os result ad os. devidio incor poiar un per- 
sonajc que fuera cl que efect tiara dicho 
movimtemo, eroando, de ema forma, lo 
que mas (aide iba a ser un famoso jtie- 
go. Pero si la hisloria del juego es curio- 
sa. mas cur ins a es la dc como llegd a las 
manos de Jitdescomp. Parcce ser que Pa¬ 
co presen i o dos prog ra mas, uno dc eltos, 
digamos el important^ era un programa 
sob re Astrologia cscrito en Basic, y el 
otro, que present aba como plat© llo jo. 
«La Pulga». Su sorpresa fue, cuando re- 
ribid una Hamad a dc indcscomp intcre- 
sandosc no por cl programa que el creia 
si no por d que liabia enviado dc rclleno. 


la Pulga habia sido reali/ada para un 
/X 81 y bubo emonecs que adapt aria pit 
ra cl Spectrum. 

Exito intemacional 

Con la ayuda de Paco Portal, un ami¬ 
go suyo que se iiuorporo a I trabajo, la 
niieva version dc La Pulga sc pudo aca- 
bar cn ires nescs. Dcsde cntonces, Kan 
aparccido imesas versioncs para otros or 
denadotes, tod as citas con exito. Pero cl 
verdadero 6dto I lego cuando el progra¬ 
ma se comercializd cn Jnglaicrra, a tra- 
ves de la compaftia Quicksilva, con el 
nombre de « Booga Boo». 

Paco nos enema que su tama cn In- 
glatcrra ha itaiado dc scr utili/ada por 
otros prog ram ad ores. «Ha habido algu- 
nos que ban llamado a Inglatcrra dieicn- 
do que era yo, para iraiar dc vender un 
programa». For otra pane, los derechos 
de autor, scgiin cl. no estan nada claros 
en nucstro pais,« Registrar un programa 
es un Jio. Un programa dc ordenador no 
csta protegido por ninguna ley. Se puc- 
dc registrar, perocsocasi se hace eon vi¬ 
sion dc futunx esperando quo haya nna 
Icy que proteja a los programas que cs- 
len registration. Hoy en ilia. solo lo im¬ 
prest) puedc estar protegido, por cso, si 
(u regisiras un programa tic mis que pre- 
semar un listado, el cual no te pueden co- 
piar. pero eon las cinlas pueden hacer las 
eopias que quicran.w 

Cuando 1c pieguniamos si Ja piratcria 
era un problems grave para los progra¬ 
madores, sonrio levementc y nos dijo, 
«no me importa la dc los chavalcs que 
sc decican a hacer unas eopias y sc las 
pa sail unos a otros, me da igual. Yo me 



Paco Sum fez un pionem de Li programacitin en £ 


encuentm a un chaval en el Rastro ven- 
diendo I Pulga, y hast a se la firmo pa¬ 
ra aulentificarla; pero lo que me joroba 
son las empresas que se dedican a pira- 
tear. Hay tiendas que, si vas por la ma- 
fiana a por un programa y no lo tienen, 
te dicen que vuelvas por la tarde que te 
haecn una copia. El problems cs grave, 
maxime si tenemos en cucnta que la ma- 
yoria dc los prog ram adores, si no la to- 
talidad dc cllos, van a porccntajc sob re 
las vesiias. 

I \ico Suarez ptensa que cl mercado dc 
Software en Espana, atm no csta lo su- 
ricieiUemetite esolucionado y que siguc 
sic ii do d Rcino Uni do la panacea dc to- 
dos los progra mad ores. A pesar de cllo 
no descana la posibilidad dc que, en un 
futuno proximo, cxista cn Espafta una in- 
dustria de Software lo sufkientemente 
importame como para crear un podcro- 
so me read o. 

Trabajar por cuanta propia 

En la aciuatidad Paco ha abandona- 
do a Indcscomp y trabaja por su cuenta 
cn una nueva oompahfa que cl mismo ba 
creada «E1 hecho de momarnoslo por 
nuestra cuenta, es porque asi podemos 
dirtgirnos nosotros mismos to dos los 
proyectos. eligtendo los que mas nos ape- 
lezca y ademas, por la rentahilidad.» 

Prognimar juegos pant csta nuc\a em- 
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presa no cs sola monte un motivo de con 
seguir dincro, sino que cs a la vcz una pa- 
sidn para tod os olios, A pesar do olio, Pa¬ 
co Suarez siguc cnuisiasmdndosc por of 
campo dc la investigacion. «Mi niota os 
la imcstigaoidti \ cstamos inteniando 
eonseguir crcar tin nuevo lenguajo». cn 
estc sen lido, pa roc c sor quo ya so han uii- 
lizado algunos comandos ereados por el, 
para im programa del Am strand genera- 
dor do grafkos, 

IVro I lev a r ana com pa ft ia do Softwa¬ 
re no cs una taroa facil. t,as grander com- 
pafiias ticncn muchas ventajas on esc sen- 
tido, qui/4s os por esc motive, por el cual 
Indcscomp siguc siendo la empress que 


disiribuye los programas do Ciberncsis. 
«Yo conozco gonte que sc lo moma por 
su cuenta y so ve agoviada por la canii- 
dad dc trybajo quo olio representa, indu- 
so de gastos, y la promoddn hay que sa- 
borla hacer iamhien.» 

Una teenica de programacion 

Paco Suarez tiene una forma muy cu- 
riosa dc hacer programas, segun el mis- 
mo nos indicaba, «Hay genic quo sc 
plantca el program a y luego como resol- 
vorJo, Yo suelo hacerlo al roves, primero 
sc me ocurre ima forma do hacer algo y 
luego lo doy una uiilidad, En La Puiga, 
sc mcocurrid !a forma do simularcl tiro 


parabdlico y luego hicc el juogo. En cl 
ultimo, ho hceho algo parccido, primero 
so me ocurrio una forma do componcr 
im mapa longitudinal, con tiras y tal, quo 
me ocuparia muy pooa momoria y con* 
seguiria muchas pan (alias, y luego sc me 
Ocnrrid on quo juego podia cm plea r esc 
truco.» 

Aunque siempre no cs asi, «Algunas 
voces sc me ocurre la idea primero, pero 
ixu que so que longo las tocnicas quo voy 
a utili/ar cn d programa.* 

Las ioc ideas de animation eonseguidas 
on su ultimo progruma estan muy logra- 
das, Hullo P&co como Cibornosis, ticncn 
depositadas grandcs esperanzas on esie 
juogo, quo ha sido ei resultado do una os- 
iroclia colabomddn entro 61 y su equipo. 
Ln cste aspect o hay que resahar que es 
una persona muy abieria a los demas. 
ttata siempre dc oil sonar a los quo Ic ro¬ 
de an todo aqudlo quo ol a proud id du¬ 
rante a nos do irabajo, 

Para Paco la programaddn cs como 
hacer una pelicitla en la que el os cl di- 
rector y con siguc, a i raves do una lecni- 
ca depurada, dar vida a unos personajes 
quo ItOgai) a sor, on mi momonto, parfo 
do 61. I 7 ] ultimo juego quo ha realizado 
so caraetcri/a, sob re tixio. porquo los per- 
sonajes ticncn >u propia person alidad, la 
cual los ha sido dada por su amor y con- 
forme a ella so muovert y actuan cn el 
programs. 

«Con ol ordenador sc pueden hacer 
obras do arte», nos decia muy soguro de 
si niismo. Para el, ol ordenador no os tin 
imt rumen to meramente dectr6ixico que 
emplea la Idgica. siiu> una maquina ca- 
paz do crear desdc tm juogo simple a una 
a men tica obra de arte. Su nueva croacidn 
en este sent i do. csta cn d buon c ami no. 
El esiilo quo ha impreso cn lodos sus ira- 
bajos le ha dado un prestigio lo suficien- 
tcmcnic importante como para airevcr- 
tios a dear quo es, hoy por hoy, urt go 
nio cibcrneiieo con prqyeccidn interna- 
cional. 

Nuestro pais empieza a despertar len- 
tanionic. Ul gusto do la gonte con respecio 
a los programas, cs cada vez mas cxigcn- 
to, y los programadoies lo sabeti. Paco 
piensa quo llcgara un momento muy cer- 
cano en que baya una industria sc Soft¬ 
ware on nuestro pais lo suficicruementc 
Importante v quteie prepararse para for¬ 
mal parto do ella. Cibornosis os sin duda 
cl camino, su camina Un eamino imtuo- 
so aceehado por ia piraterfa, dondc uno 
puede encontrar la gloria o sumirse en 
el mas absoluio de los fracasos. Paco ha 
acoptado el rcto. 
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EL LABERlim 

BSSQSEE HM 

Nuestra mision en esta WQsion, nos llevaro por 
es patios into res tel ares, en donde sunjiran una serie de 
compNcadones en la nave que tondutimos, 
obligdndonos a to mar las medfdas oportunas. 


Ante una averia en la sula de maqtii- 
nas de la nave nodri/a, tendrcmos que 
descender a didin snla j buscar d talk) 
can same del mal, Sera, alii donde darn co- 
niitwo In (K'sndilln; tin largo tabermto 
de linichla* del que sera muy dificil 
salir. 

Para lograrlo contangos con cuairo ni- 


velcs de diftcuhad, con un tiempo limitc 
que debemos euidar y con una serie dc 
teclas para mane jar cl juego: «Pw, para 
ir hucia la derecha; «0», para ir a la iz- 
quterda; «Q», hacia arrjba; «A», hacia 
abajo; «T>\ para avan/ar una pant alia, 
y «U», para rctrocedcr una pamafla. 

IjSuerie!! 


f+OTitS i;esr jca:- 


n u 


O 1 LET K t .0 BORDER 0 PAPER I 
3Nh 7 CLS QO SUB 3000 DO 5 

UB *200 GO SUB 9220 
2 GO SUE 9960 

S LET ateclHT iAND*25 GO SUB 
4050 LET VH m J.0 LET hh .2® FLfl 
SM S BRIGHT 0 
B GO TO B 

7 LET |.((vh<£ OR vh=l* 0* wh 
= 13 i - *1 AND ihh»2 OR hh*3 OP hh»l 
4 OP bMl5 OR hh *26 OR hh-20l-H 
RETURN 

10 go sue 0210 oo sue 3040 0 

0 sue 9233 GO SUB 3500 _ , 

11 GO SUE 1000 GO sue 3000 I 

F TNKCYt■ ■ • THEN GO SUE S270 

12 00 SUB 7 GO TO 11*9* iVh-hh 
: .0 AND h h - vl> I AND hh -vh (10 fl 
MD Pih -Vh ■- ■ 13 AND INKC t t-'T" AND 
1*1* 

2-0 GO SUB 9210 GO SUB 0060 G 
0 SUE 9232 GO SUB 3500 

51 GO SUB 3000 IF INKEY* c M 
THEN GO SUB 9270 

22 GO 5U& 7 GO TO 23 + 7* r*<l A 
ND INKEV |t ,r U'l 

53 GO TO 21-11+IVh-hh < ,J AND V 
h-hh. 4 AND INKEY tx'-u AND Ml- 
AO C-0 SUB 9^10 GO 5UB 9070 G 
0 sue 0532 GO SUB 3500 

31 GO SUB 3000 If INKEY*-. "" 

THEN GO SUE 9270 

32 GO SUB 7 GO TO 33 + 4 57+<* I, * 

■ 1 AMD INKEY**'' l H AND IL *t' +267+1 
*\t!=0 AND INKEYf■ " t " AND % ■ 1 : 

33 GO TO 31-!1t!¥h-hh : >3 A N 0 v 
h-p-.h -4 AND vh-NholS AND Vh-hh* 

16 AND INKEY*- U" AND fc »1J 
40 GO SUB 0210 GO SUB- 9000 G 
0 SUB 9232 GO SUB 3500 

4 1 GO sue 3000 IF INKEYf >. 

THEN GO SUB 9570 

42 GO SUB 7 GO TO 43+7+ihh-vh 

Oil AND hh-Vh<’10 AND iNKEYi* I 

AND i-all 

43 GO TO 41+439*AND INK 
EvlV'y- AND 1-1S*2B9*itIt*0 AND 
INKCYft*"u" AND i-Bli 

50 go sue 0210 tp^k 1 go sue 
9 too go sue 9532 go sue 3500 , 

51 GO SUB 3000 £f INKEY*<1 -■ 
THEN GO SUE 9270 PRINT HT 12,2, 

52 g6 SuB 7 GO TO 53*7irvh-hh 
1 AND vh-hh:>2 AND hh-Vhul3 A 

HD Kh-VhpU AND hh-*hf>27 AND K 
h.Vh 26 AND INKEYfAND &=1* 

53 GO TO Bi - lit 1 INKEY** M y" AND 

’ft^GQ SUB 9210 GO SUB 9110 G 
0 SUB 9232 GO SuB 350O 

fcj, GO SUB 3000" IF INKEY |t i 
THEN GO SUB 9270^ ^ , 

62 GO SU© 7 GO TO 63+7*ivh-Hh 
v-tB AND ^-hhn|S AND Vh-hii(4 
AND ¥h-Pfh<?3 AND INKEY 1 *" t " AND 

l "&3 00 TO 61-11!NKeV*«"U" AND 
tail 

7@ GO SUB 9210 GO SU6 90B0 G 
o sue 9232 GO SUE 3500 

71 00 SUB 3000 IF XNKeVtO**" 
THEN GO SUB 9270 


73 GO TO ?l- 11# [hh-vht -27 AND 
hh-vPiOfl* AND INKEYf ■" W “ ANO ^*1 

300 GO Sue 9210 GO SUB S0SO G 
O SUB 9232 GO SUE 3500 
302 GO SUB ?0C0 IF iNFfi» t 
THEN GO SUB 9270 
302 GO TO 303 + 7* twh-hh 0 AND h 
h-vh Ol And hh-uh i ^*7 AND hh 
■26 AND >*hs2 OR vhilS>=l AND IN 
KEY** l ANT- ihh«2 OR hh=3 Q* hh 
i?e QK hh-£9 OR hr, -14 OR hr - > - 

1> 

333 GO SUB 7 GO TO 301-271 V j 

KEY*^ v AND l=l.i 

310 GO SUB 9E10 GO SUB S060 G 
O SUB 9232 GO SUB 3600 

311 GO iUB 3000 IP INKEY1 ■ 

THEN GO SUB 9270 

312 GO SUB 7 GO TO 313+7+iIMKE 
Y * = ‘ t ' «ND IL^IP 

5i3 GO TO 3 11-11+ '.vh *hh < -3 ANC 
vh-hK •: • 4 AND INKE.f- y'^ AND * ■ 1 ■ 

320 GO sue 9214 GO SUE fO70 G 
O SUB 9232 GO SUB 3500 
021 GO SUB 3000 IF XNKEv* 

THErj GO SUB 9270 

322 GO SUB 7 GO TO 32 = h h - 

h < - 13 AND hh-VK< >12 RND IN> E r t = 
l" AND K = 1 

323 GO TO 321-H+ i INKEvf. u AN 
D UD 

330 GO SUB 9210 GO SUB BOflO G 
D SUB 9232 GQ SUE JEO0 

331 GO SUe 30B& IF INKE.| 

THEN GO SUB 9270 

332 GO TO 033-293+t <vh^^ OR V r,= 
IB 1 -! AND INKEY i * ,B tRND ihh=2 0 
R hh«3 DR hhiipe OP hh-29 OR hh = l 

5 OR hhTfld J ml I 

333 GO TO eOl-ll*i{Vh>8 OR vhil 

0i«l AND 3NKEY f = RND ■ hh *2 OR 

hh ®3 QR hh *26 OP hh*29 DR hh*iS 
OR hh = 14 n =l> 

500 GO SUB 9210 GO SUB 6010 G 
O SUB 9232 GO Sue 3600 
50 1 GO SUE 3000 IF t NKO' f 
THEN GO SUB 9270 
6B2 GO TO 503+7+Mvh-161 -1 A HO 
INKEYIp- l" AND <hh*2 OP hh.3 OP 
hha29 OP hh a 15 DR Kh^ft QP hh * I* 

► *13 

503 GO TO 501 -4 71* i tvh ■£ OR --h z 
103-1 AND INkEY f PND fhh*2 0 
ft KK*3 DR h h-29 OP h h■ 15 OR hh±2 
S DR hhil^ ill 

510 CO SUB 9210 GO SUB 6020 G 
0 SUB 9232 GQ SUB 3600 

511 GO SUB 3BB0 If INKEYf >"" 
THEN GO SUB 927B 

512 GO SUB 7 GO TO 513+7* Ihh-v 
h i | 10 RNO h h -Vh Oil AND IN KEY * - " 
l" AND H.l) 

513 GO TO 5 11- 11 i C INKEY * *' H u 11 AN 

520 GO SUB 9210 GO SuB B030 G 
0 SUB 9232 GO SUB 3500 

521 GO SUB 3O0O IF INKEYf(j" H 
THEN GO SUB 9270 

522 GO SUB 7 GO TO 523+7+(hh-w 
ht 13 0N[) vK-hhu3 AND hh^hOl2 

AND tfh-hho4 AND hh-¥ht>ie AND 
hh-vhl>19 AND INKEY * ■“t“ AND *+1 
) 

623 GO TO 521-11* (Kh-vho27 AND 
hh-vht »ae AND INKEY t i 4i U " AND fc* 
II 

530 GO sue 9210 GO SUB B04Q G 
O SUB 9232 GO SUB 3500 

531 GO SUB <3000 IF INKEV|n H ' H 
THEN QO SUB 9270 

532 GO TO 533^493+<fhh-vh s 13 OR 
hh-Vh-12)-1 AND INKEYi — 1 ' \ 11 AND 

thh-2 OR hh-3 OR hh-15 OR hh*29 
DR hh^2B OR hhil4l.ll 



533 GO TO 531-1 1 t Lh,h-uh < *27 AND 
vh -hh ( .i 15 AND vh-hh(>3 AND hh-v 
h t >2e AND vh-hh ( * 16 AND vh -hh < p4 
AND INKEY (h"u " AND ljU 

1000 &0 TO 1002 - Ihh ( i> 

1001 GO TO 1003 

1002 RETURN 

1010 CLS BEEP ,5,10 RfttNT B0, 

Ou. + re& ny«v9 i so ' 

1011 PAUSE 6 IF INKEY* t I “ n " THE 
N GO TO 4 

1090 STOP 

2000 FOR i-O TO 30 BEEP +01,1 
NZVT * CLS PRINT ‘ ' 1 AND 

R BAJA DE NIUEL Y SUERTE J PAUSE 
JO® GO TO * 

3000 L£T ti-ti-1 PRINT SO.AT 0, 
25, U . J ’ IF NOT ti THEN GO + 

D 2900 
3010 RETURN 

3500 PRINT H0 , AT 0„5 , "TIEHPQ OUE 
TC OUEDA- RETURN 
4000 PAPER 0 INK 7 CL5 
4020 PR INT ■ FLASH l r 'PULSA EL 

1 PARR NIUEL D£ INFANTE.PULS 

A EL 2 RAftfl EL AMATEUR.PULSA 

EL 3 PAPA EL PAOFESIONAL.PULS 

A EL 4 PARA NIUEL HAS 0 0UIST A“ ' 

OTRA TEOLA PAftA PPACTICRS' 

4O40 PAUSE 0 
4050 IF INKEY*-"!' 

00 

4060 IF 
50 

40' 70 IF lNKCYf- HH 3^ 

00 

4O30 
00 

*090 CL 3 RETTUftN 
500O FDR t +0 TO 2 


INKEV * ■”2 " 


Then LET t I "5 

THEN LET 1 I*3 
THEN LffT fi«2 
tr INKEYli"*" THEN LET \im% 


READ v 


READ 

K READ ion, GO SUB 9050 FOR *. 
1 TO ion READ di/ LET ?■?*£+id 
i r ®li -2* i*t i r <21 LET u*u *2+ r NOT 
0 + M -2 * d s r = 3 > GO SUB ^050 NE +. 

T 4 NEXT r GO SU6 9030 RETURN 

3010 GO Sue 9930 GO SUB 0020 C- 
ATA 2,14 ,7,0.0,0.0,0 0.0,15,2-', 
1-1,1, 1,1,13,14,6,1.1. i,U4 

3011 REST6 RE 3010 GO SUB ^030 
return 

3020 GO Sue 9930 CO SUB 9020 C- 
AT A 2 * 2 _ 3 , 1 , 1.1,1 , 1 , 13■ , 14.1* , 1 1 

* i,3,S h i-,5, i, i t 1. i r 6 ,0 . 0 , ie ,20 

. 1 ■, 1 ,3 i 3, 1 , 1 . 3 , 3 , 1 , 1 , t, 3, 0.1 . 1 .3 
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. >1 


1 


r_“I-V=^- 


,3,1, 1,1 

3021 PEST0-ftfi 3828 GO SUB 500® 
RETURN 

603® GO 5U5 3330 GD SUB 9028 C 
ATS S/* x 13,1*1*0,0,8,1.0,0,8 7 0 

. i,i x a. U ,7.,4'fi.A 6.6,0 ti.±.ie i 

1 , 2 a 2 * 0 , 0 . O r O 0,00,0, * 

3031 RESTORE 60 30 00 SuB 5® 02 

RETURN 

PO40 Go SUB 9930 GO SUB 9050 I 

srs 3 , 2 , 15 , 1 . i,0,0 0.0 o,e 0 . 0,2 

. .L 1. 1 , 1-2, 14 . 14,1 ■ 1.0.0.0 O O 0 

,0,0,1,1 . 1,1,1.2® ,3, O 0.0 
A®*! Resfotfe 0040 go sue 5000 

RETURN 

0050 GO SUB 9930 GO SUE 405 O D 
flTfl J r 14 , 7 0 , O , O - © . O ■ O j 0 . IS i , 5 . 

Li, 1,1,1 , is. 14,6 1,1, i , 1,1.1 
#051 RESTORE SO50 GO 5'JB 5000 
RETURN 

3060 GO SUB 3030 GO SUB 90*0 C- 
ATA 2.2.5,1.1.1.1.1,13.2,4,1.1 3 

i3< ^i 3 i^ ?i 3 . I? f £# . 3 -3.3.3 
S06i RESTORE 0060 GO SUS 5000 
RETURN 

8070 GQ SUB 9930 GO SUB 9020 t* 
ATS 0,8,8.10.2 

.5.1 .1,1.1,1.10,26.3.3,3,1 
5871 RESTORE BO^O GO SUE 3000 
RETURN 

BOBO GO SUB 9930 GO SUfi 9020 0 

RTfl 2 2 , 9 - 1 , 1 - O . 0 . 0 # B . 0.0 , 0 1 3 - 2 

1 1 1 ' 2 14 

8801 RESTORE SOSO GO SUB 5000 
RETURN 

9000 CLS PRINT AT 10.1 F L a 3 M 
l. r “Sff CSTflN E.IBUJRNDO L«5 PUEftTA 
V' ORTA 0,0.0.0,3.15,31.127 0,0 
-0,0 192.210.252-355-1 ( 1 ,2 3 ' 7 
.16,15,16,15,7,7,3,3,1,1,120,12* 
- 192- 192-224,2±4 340.240,240 ^*0 
, 224,224. 192, 192,128,128 . i27,3i . 
15,3,0.0,0.0,255,252 . 240 r 142,0-0 
.8,0.255.36^255 36.36.253,36 235 

4®Al P0K4 2««.85 POKE ±357? - 

33 RESTORE 9880 F0& a*0 T0 71 

READ COd POKE USR M * ,J # ft , C 0 d N 
EKT 4 RETURN 

9010 BORDER 0 PAPER 1 INk i C 
LS RETURN 

9820 BORDER 0 PAPER 1 INK 7 R 
ETUPN 

9030 ORTA 1,2,9.2,17,2,1,28,1,1* 


,9.26,17,14 i 17.20 

90ii rrpEr i Ink i restore 903 
0 FOR P *1 TO B RE PD ft R£Pf> 
BEEP .01.PRINT AT 
J .AT lii.t-l, p 


" , RT ft *3 . * r 


9040 GO BUB 9930 


RTS 12,2.0,0,8,8,1,1,1*1, 1,2,2.2 

o. 1 , 1 , 1 .i.i, i ,o, a, 0 r Li.i.i.i.e 

liSi 0 ftfsT6lt ? l^*^ r S6 4 5UB 500® 


tTuiS 


nEeT p r£tu 
GO SUB 9029 


' iAT 11.0. 

7 


PRINT 
RET UR 


PRINT RT 10,0.- 
RETU&N 

9050 EE£R .085.39 INK 

at 9 , K , " “ , nr 9 + l, % ; ,H 

9960 GO BUB 9930 GO SUB 9020 0 

RTfi S,i.l 6 f 1. LLfl.S^ aM. 1 . 1,1 
*1 1 - |'| * 1 * 2 t 14,3.0,0,0,13,2,5,1 

^061 SiSTORE 9060 GO SUB 3000 
RETURN 

*078 GO BUB 9930 OATS 2,2,12,1 

S A 0-9■O■0/0.0.9,0.1 ■ 1 , 2 ■ 14 , 7 . 3 

o i o . a, 0 r o 

9071 RESTORE 9070 GO SUB 5900 
RETURN 

9060 GG BUB 9930 GO SUB 9920 D 

«rn a, 4 .*, 1 . 1 ,i,l,ia,a«,l?.e,e ,3 
, £ . * . £ S .£ , £ .£ . i , S , 2 ,3 , i , 2 . 8 , ;0 . 
* . i*. i , 1. i. 1 , 1 , 1 . 3 , i. 1 , t, 1 ( a, 3 , i 

4a5i restore soae 00 sue s®ec 

RETU»N 

9090 GO SUB 9930 GO SUB 9060 L 
ET ftyvlB LET 4 * *26 GO SUB 9900 
RETURN 

9100 GQ SUB 9930 RESTORE 9040 
30 SUB 5999 RETURN 
9110 GO SUB 9930 GO SUB 9070 
Jy>l$ LET ixh£ go sub 9990 

LET fty»lB LET ftM-14 GO SUB 99 
!ETL- 


39 


m PN 


BEEP ..1.20 BEE 


9120 BEE P ,1,10 
0 -1.30 Return 
9290 CL S PRINT AT 10,1, FlR£M 

1 "RHOEfl L»S TUfteRTflS ,, OPTS 4.4 


4(112- U6,e-4.36,96,96 .96.4® 
. 107 1 IB, 106,64 ,S**, ilS j- 4 , i , * , 4 . 
4 106 111 107,9®,96,96,96,96,*,7 
S,7.i>, 255,6,0,S6 Ji4, 6* , £&* . 6 .2 
55,0,0.0,^4s,a4i,6,7,4, 7, *, 0,265 


,£S5.9,»4, 64.334,96.4 ,7.0,15 ,4, 
313.114,69,96,334,16,240.44 37,5 
0.36.B1 2*B.ad6,6.-',i.7 4 3l6 35 
i '5?4 1 Ji ia *' 6 *.46.*.7,0,19,S 
3.310 ,06.01.96,224 . 16.340..96 . 107 
,ie0,*O3, 63,334,334,44,7,4,71 *, l 
4*. 16.11,0.424,44,ai*,4®.*,7.2 .7 
,B , 200 , 112,01 96.324,64 - 224 12.5 
9.403, 10,03.343,413,^, l4, 6 7,4.1 

0,37,59,256,346.16,334,96 
9401 fteiTORe 930® POr 4 33675,® 
POKE 23676.260 FOR t40 TO 159 
Hear- can it poke usp - *-+c,c*ni 

ft NEXT < 

9203 FOR TO 783 STEP * GO S 

UB 928 3*3NT (PNOtt* NEXT ^ PET 
URN 

«0O POKE Bt*+0,1*5 POKE £8881 + 
f jp 1*7 POKE Befii2+9,1** POKE 88 

002*9.1*8 RETURN 

920* POKE &t**f,149 POKE 688*14 
9 151 POKE 68862+9.1*B POKE B8 

^8 3+9■ 158 RETURN 

9285 POKE 6e4#0,i33 POKE 58881 * 
9,155 POKE 68*0245 4 152 POKE £8 

&B3 *9 - IS* RETURN 

9206 POKE Bl*+f,157 POKE 58881+ 
g,159 POKE 508*2+9,136 POKE 6 ® 

M3 *9. 13# RETURN 

920 7 POkF 5t * 4 9 , 16 I POKE 60081* 
9,163 POKE 60082+9.160 POKE 58 

003*9,162 RETURN 

9218 GO SUB 9120 PAPER 1 INK. $ 
POKE 23675,0 POKE 23676,250 
RANDOMIZE USP S«* RETURN 
9228 l‘U PRINT AT 10 -B; FlRSN 
I SrtORS Tu CuERPO SERRSnO ” OS 
T A 24,60,172.136 r 58 , *0x* . 15 ,60, * 
4,16®.234.64.0.0,0,24.60.44,D,4® 

,06 19*.96,4.13,13,6,16,160.224, 

64 24 .*CV 44 ,6,56.36,196.100.8,24 

.34 16.16.16,16.46,34.68,44.6.96 
. 36 ; 69 336 . 8 , 6,24,34,36,Sfc,J* . 1® 
i ll-: 30 2* 4 , 26,16,6,24,10® .4,12 

. 13 , 16.16 ■ 17,9® 

9331 OSTh 2* 60,63,17,36-70,33.7 

50 35.S7 „ 70,^2 r A& t *6,16,5,5 ± 7,2# 

2* 52 . Lfe , 2S , 36 r 35.35 - 15, 2* . 2* 

8-8 *-e,12,24,58,52,18425136,3* 
■ 3® ,15. 15 4 B* .3*4 05,36,8^,99 .,*5,1 
20,18* 32,56 . 72.95,24.35,38,45,* 
5,72,72*136, 196 

9£22 PQ* E 23&7B.2SS POKE 23676, 
2?0 RESTORE 9220 FOR K*8 TO 15 
9 ReSp hO* POKE U5R “ft *K,hoi 
NEXT h RETURN 

92^0 GO BUB 99*0 POKE 23675,47 
POKE 23676,251 GO SUB 995® 

0231 GO *.P ^940 LET hh*hh-CINK 
lYlo'"' SNt- RTTR fvh # hh-l> 0 181 
POKE 23675,31 POKE 23676,251 
GO SUB 9950 

9232 GO 5U6 99*0 LET hh-hh-slNK 
L$r V StID fiTTP (vh rfhK-ll 4*13? 

POKE 23675.53 
GO SUB 995® 

9233 RETURN 
5240 GO BUB 994® 

POKE 23676-261 
®2*l GO SUB 494® 

EY It l 1 ' 1 flWD RTTR 
POKE 23675,111 
GO BUB 9950 
9242 GO 5UB 99*8 


POKE 23676.351 


PQK6 2M7S.14 3 
GO SU» 995® 

LET hH*hh+(lNK 
, Kh 4 ll <> 131 
POKE 33576.251 


let hhfthft+fINK 


EVf<r i " AMD RTTR (vftjKh+lP t j!3J 
30KE * 


*v i “i ^ mi imrTiF ■ * j J 

POKE 23675.127 POKE 23576.351 
GO SUB 9958 


POKE 23675-2BE 

GO SUB 995® 

LET vh »^h -l 


9243 RETURN 
925a GO SUB 9940 
POKE 23676,258 

9251 GO 5UB 9948 _ 

CY|n- SNt> RTTR <Vh-l r KK:i =13> 
POKE 23675-15 POKE 23676.251 
GO SUB 9950 
9232 RETURN 

956® GO SUB 99*0 POKE 23676 79 
POKE 23676-251 GO SUB 9050 

9261 GO SUB 99*0 LET yh = yh*«Srm 

EYJ <>“■ AND ATT ft i vh +2 . K h '■ 1 3 » 

POKE 23575 , 95 POKE 23676-251 
GO SUB 995® 

9262 RETURN 

9270 GO SUB 9940 GO TO 9271+t IN 
KEYS= U AN® ATTR ivh ,Kh-[l >17 
AND- ATTP tvK + l,Kh-l> t - 13 I +2t - INK 
EYIi 'p ■ AND ATtR ' - h,hh *L *13 A 

ND RTTR (vh +1*hh+1 > t 131 +3 * i INKS 

Y !■ 'q' J *4 * ■ IN K E V * - “ ft " j 

9371 GO SU6 99*8 RETURN 

0272 LET hh *hK - < ATTP |v^. . hh - I 1 

13> GO SUB 923® RETURN 

9273 LET hh-hh+(RTTR f v h , K K + 1 i * 

13 ^ GO SUB 9240 RETURN 

927* LET Vh»vK-*ATTR tvh-l.Kh) : 

17 ► GO SUB 9258 RETURN 

9275 LET vh.vht iflTTfi [Vh*2,hK- ;* 

13J GO SUP 926® RETURN 

997® POKE 23575-66 POKE 2367 t,2 

55 RETURN 

994® PAPER 1 INK 7 PRINT RT yh 
r KH. OVER 1 - -J- . AT VK +1 p Kh , 8UEA 
1, i RETURN 

9950 PR1NT ST v h # hn r ’ Z ■ ■ ST vh * 1 
hh.-L" beep .05,18 Beturn 
9968 RESTORE 9961 FOR w * 5ft * TO 
50058 REA0 v POKE v . 9 NE■T 
p ET URN 1 

9961 DSTfl 6 a,a,?®B, i,aa,«, aa,«. 

fS<?3*13-i3ii»?j6 t 3a,6a,aa.a 


,ia6 ,sg,e.4i,a3l 

9»®0 "tiatr 

r CODE 58 ®®®,100 


SA'JE Cft - * 64 
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V PROGRAMAS MICROHOBBY 

DATABASE 

M -H..J .11. !■ 



NftE\ | 7' ThCN GO TO 120 

100 LET y*UAL INKEVi CL5 00 
T 0 u+ 100 ® 

1000 CLEflfi LET lip LET Uf»” ' 
INPUT ‘C'JflNtOs CftMOOS fiuFANUHE 
PICOS T £ RE SERVO PARR CADR PEG I? 
TP&— * IF * 0 THEM INPUT "CfiNT 

ZOflp DE M6IT05 POP cnMPO*"'d 
101® INPUT "CUANTOS COMPOS NUHEE 

tcfis TE RE5ERV0 PAPA CPC fl PE 
OI5TPO'" b IF A *0 THEN LE T <1 -0 
1020 LET eiiltll 4d*4b#i> LET 

■: tint ■ | 71000 - - 1 *p ' * 10* £ t 

1030 PRINT AT 10,0 EL NUNEKO HP 
-IMG £>E REGISTROS COM CL QUE P 
ue [ fi' TRflifljPR c: oe " -c 

i04rO print "0 , Ooftferitfe ■ 5 n 
1050 PAUSE 0 :f iMt.tYf *"ft " OR I 
HKt '1 ti!*' THEM CCS GO TO 1000 
1060 IF INKE', f = i ot I r4*■ E it 5" 
TH£fJ CO TO 1O80 
10^0 GO TO 1050 

I 0?0 flH &i£,2' IF i«0 Then OC 
TO IlOO 

LOS0 DIM at i £ 0*5 C Irt IM 4,10 
D IH J 1 ' C d * 

1100 : F t =0 THEM 00 TO 1120 
; i iO C- IH C I i & . l&» Mm 4K b 
i;?0 Cl5 IF * -0 then fog n-1 t 
C i INPUT TITULC DEL C&MPO flLF 
RNUHERICO « (nii H ", ti > ni ME -T 

L 1 I 0 IF Q >0 then for nil TO b I 
MP'.iT T TTULO DEL CAlfPG NUItEPICC 
-m c|ihi NOT n 
114-0 GO TO 20 10 
£000 IF 2 iO THEN 00 TO 100 
10 LO IF I s( THEN PC INT m7 10 0 
FICHERO COHPLETO" “ PuLU vn a 

'-itL* PflU&E 0 GO TO 100 

2020 LET 2 =Z+i -PRINT N'jMEWO DE 
ORDEM I XU EDPM 1 .c -r r " PEG! 
5TR0S IF i 0 TM£n FOR ft = 1 T 


8 




■ WWSff 


1 1 £ I , ¥ 

*<mz ,y to 


LET _.. 

f £t Tfi I r 

PRINT bflftl, 

-lii NEXT ft PRINT 
2000 IF b -0 THEN FOP ft * 1 TO & I 
NPUT "DflTO IN \ 

PRINT £ | i, n ) # “ ^TR* I3S-LEN STR 
f INT • it -m» . | (3 NEXT n 

5040 PRINT ”CO-ft I < S/H 

5050 PAUSE 0 IF INKEV*-' 1 *" 0£ i 
■NKC-. t= S' THEN CLi GO TO 2000 

2OC0 IF XNKEY|*”ft' OP rNtiCViaTN 
THEN GO TO IOC 
£070 GO TO M50 
"000 IF I -O TH£M GO TO 1Q0 
;01D INPUT OUE REGISTPO OUlERES 
MOD I* 7 IC apt" 1 ft l p n ; ThEp4 prin 
T ftT IO.O MUHCRO OE PEGISTHQ* 

: CO TO 70 10 

1020 CLS PRINT REGISTRY HP . " 

IF i O THEM FOP Hi TC 3 
u 1 1 * i n - 1 1 -t-d PR INT m , - b 

. * . 11 <ft y to y*d-li FiE-T 

* PRINT 

7070 IF t O them FOK i-l TO b P 
G1NT l+A, - UCICil.m '26-LEN 
ST ft f INT 4 . ■ i ? . h <ft . a 1 ?;EXT • 

3040 INPUT OUE CfiHFO OUliRES MO 

PIFICftgT ■ * 

:OT0 IF b 4 THEM LET . iu-4 GC T 
0 ? 100 

:O60 let -jii# u - ii input ts 


1 SAME ’CLRSIFICR LINE 5 
3 PRINT RT 10,0 REEOPINfl Y K 
EPIFICRREHOS 
0 UCRIFY 

■I CCS PRINT RT 10,0 CORPEC 

to pause iso 

5 LET T-0 LET U*b" " 

10 BORDER 1 PAPER 1 INK T F 
OKC 23605 SO POKE 2 363*^, 

100 CLS PRINT 9 '■ 

■ 1 - I NIC I RlI 2 RR Fit Hi 

- R\ftDI& UN REGISTRO' "3- NOD IE 
ICAP UN REGISTRO" "4- L25TAC 

CISTEOS InTRODUCIPOS.3- CLRS3 

FICRR ■ ■■* - LlSTflR REG IS T RO 5 CLA 
SIFrCfl&Q5 hJJ "7- GfifiEfiE PPOGPAHR 


IN UE R 3 El^ t SR I GMT 1, 2 
i 10 PRINT tt0,"Pull* 4l OPtlPft ^ 
vf 

120 PRUSE 0 IF INKEY 1' OP I 


Estumos ante tin programa de 
utilidades qtie nos permiHra 
construir un fidiero ton taut os 
compos numericos o aifamimericos 
(omo precisemos. 


Una vc/ «picado», con la instruccion 
RUN, conseguimos una copia del progra¬ 
ms rcducido a vu minima expresion. Por 
otra parte, todas las variables que preci- 
sa conoccr |2>. esian detinidas en el co- 
mando 10. Despues do vcriflcado, nos 
presenta un compleio menu con siete op- 
ciones: la primers, prcgunia sohre la 
composicioti que se quiene dar a cad a i e- 
gjsiro o conjunto de daios, \ oontinua- 
ddn. s'l programs pass, por solo, a la 
segunda opcidn.en la que sc podra retlc- 
nar con L>s datos tamos registros eomo 
sc quiera, sabiendo que se pod ran aria- 
dir mas. 

14i tcreera opcidn, lac i la a la mod it i- 
cacidn de uno o varios datos de tin re- 
gist ro, eon lo que, posteriorincnte, sc \e- 
ra en pantalla el nuevo registro. l a cuar- 
ta opeidn, mucstra, uno a uno, todos los 
registros que se Imyan iniroducido en el 
mismo orden en que se ha hecha 
l a quinta option permite dasificar ro- 
dos los registros iniroducklos: 

— a I label ica me me, si el campo es al- 
ramuncrico. 

de mayor a menor. si cl campo cs nu- 
merieo. 

I a sexta opcidn proporciona todos los 
reghtros intaxlucidos, dusiTicados por el 
campo que hayamos decidido en lu op- 
cion 5, 

Pur ultimo. In septima opcidn ayuda 
a cnibar y veri Hear cl problem a junto con 
el ftehcro, para, despues, volver a I me mi 
>■ optar por seguir trabajando o dcsen- 
chufar. 


4 i NUEUO & RT O "■ ilib^ TO 

7070 00 TO 3110 

7J0D 3MRUT " NUEVO DATO^ 

1 i ft . k> l 

3110 PRINT D0J. -Rllune * fei ’ J N 

3120 PAUSE 0 IF t! Jr.EY A m ”f 0fi I 

NKEi *B !t S" TmETJ GO TO 7040 
,:.0 IF INF.E f.--f OR liitE t- n 
TME’f GO ^0 31S0 

*140 GO TO :i£0 

31F0 7L*- PR INT "REGISTRY No. 

i 160 IF g 6 Triers FQF m ± 1 TG 4 L 

ET y 41 - < m -1 * J PRINT m , 11 - frf 

* i 1 r- , y TO y.**-11 MC-T i 

PRINT 

3170 IF Then for «I *1 TG b P 

BINT h ^4 "- - f TPi 153-LEN 

ETC f INT 5 -f * * iT .Ml NE:-:T p. 

li 


■160 PRINT 


c&rtf&fmt ' 


(! m 
m i 


31^0 RftuSE 0 IF 3ti> EY f = 5 - 
n *r I- : GO to 100 

: =00 IF XNPf: %- -n OR XNF-E ti U 
THEN GO T? 40£0 
3-210 GO tc 31 GO 
4 0O0 F QK n * ; TO 2 

40:0 _lE PRINT Nf. * E E ORE EN 
,ft . " 2 

4&£0 IF 4 o THEM FOR lii TO i L 
ffT j > 1 ^ - 4 . PR INT bf - " 

i 1 1 f j TG -j ♦ 3 - i • NEXT m RRInT 

4AG0 IF t -0 then FO^ ft -1 TO b t 
W1P4T £|-' .TAP ae-LCM ;TOf 

INT £ I n r *y 1 * Ift .NE^T ■ 

4 0 10 ^ i ■ I 1 . T 30 . Pa- 3 9 J 11 : F 1 f t - 

Via un* tecta' PAUSE 0 
*050 N£nT ft 
4S&0 GO TO 100 
5000 IF 2-0 THEN GO 

5010 PR INT TflE 5. ^ ^ _ 

IF it 0 ThEN p-ji. 

■ a PRIiyr -AG 9, ft, - t* 

next n ^ 

5020 IF 5-0 -HEhJ FOR n-1 TC b 
RIWT Tfif S ft *4 - : * * MC-T 

n 

503O input Introduce 1 * 

t ut 4 (! I 1 ! 

C40 7“ 

GO TQ 



IF^^l 6A y 1 * p ™1 1J -.LI 

5050^ IF^y - i ThEPJ LET y*y-* LET 
U f => -;•' y 1 60 TO *500_ 


6660 L^T g t n b ft <y 1 

ti 


let ¥ • iy-lP 


LET at I ft 1 til 
■ ft ME ■ 


t 1 h 


5O?0 P 0R ft*i TO z 
ft . y TO y+d - 11 L C* 

5060 Cl: PRINT AT 10.0, E5RERA 

UN PQCO ACA30 CRECS OLE 1C 

UrJR MflOUSMA^ " ■ ”ESTC 
C ANDO" 

5090 FOR 2 FOP ft 1 1 TO 2 :- 

7100 IF 1 t 1 ft > d f lft * I - THEN lET ! 
4 ^ t - n 1 L ET dl’fti Hi ft ^ L « FT 
d g 1 r # 1 1 ■ t i LC T -.'it • r - 2 1 - ET t 

ft . 2 1 ■ t. ■-n + 1 2 1 LK T b 1 r- ► I .2 f , 
5110 NEXT r, ?£E>t m 

51.C0 PRINT P0 FLR p H 1 PULS-* JN 

A TEDLA PAVfe 0 GO T :■ :00 
5500 FOR n*l TO 2 LET nr I * 
n.yi CCT b4ft.2i* r ' v£*T f 
55 I 0 Cl. 1 PRINT at iO C 


► 
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PROGRAMAS MICROHOBBY 


UH 

UNA hbquIna 


ACft30 caee* 
-C5T0 


CLA5TFI 


CAi iC‘ C'' 

55£3 FOP *■! TO I FOR r.=; TO 1 -- 


5570 IF t ir, U r n*l ; THEM _E W 
y ■ s? ■ n . i p ut i 

LET c. 1 f- * 1 , 1 i eu LE T y a < r £ ! lE 
T frir. , £ S It i n *1 ,5 I L* T fr * r # I a * 


5540 NEXT n MCVT t 

5 PE I NT H3 f=LH:H 1 t _ ^ ; A jw 

a TECLft" PALM 3 GO TO 133 
6003 FOR kil T g z 


e&ie cl5 let 

*020 PRINT "No ■ DE OPOEN * . 

■ 2 CL A 3 IF ICflDD POP -t 

6330 IF * 0 ^HEt, FQP Etil TO * L 
CT j* lp- 14 * dt 1 kX JnT 1 1 i P 
4 i ! fi- . V TC i * d - 1 ■ NE. ■ T f t c mi 


^040 if p 3 """men f;.e. e .• i t: = r 

SINT CftF 1 TAB 1.2 S -lEN !Tfii 

I NT % ( ft , p * i . A Lft , p * N£ *.T F 

>-05 3 PBI^T H3 Fir* c-:-Minif40 RU 
H vfiJ Ut U PAUSE 0 

coee NtXT ■ 

*c ~o oo to 100 


-003 

I'MJI 

TmEN 
**013 
l TO 
^O£0 
ALLA 
7030 
"3*3 
NA Y 
70S® 
7S60 
rro. 

7070 


INPUT 'NOME PC 3 EL 
+ 13■ LIME It 

l£* 1 |a"CLfisIFiffi 

IF LEM 1 it ■ 10 THEM 

103 

CL1 PRINT AT 10,0 


PRQGAAhA*" 
IF ur" 


LET U>t| 
“UHM05 


5AUE rCft LINE 10 ^ 

CL* FP-fiiT AT 10 0 "PfBQBI 

UCfl 1FIMMWS 

l-EPIFY 11 * i ^ „ 

CLi PRINT AT 10 h ®. jj UALE T 

LO WAS 5OR3AO' 

PAUSE 250 GO T* IOC 



LOS MOSQUITOS 


NOTRS GRRPICRS 
h §“c~D~E F G H I J 

> < ✓ ^ * T * 



Con este progroma 
podremos ensaiiamos 
a gusto y dimmer el 
mayor numero de 
mosquitos con tan 
solo apretar un baton. 
Compruebelo. 

Para Hoar a eabo tan agradahle [area, 
disponemm de dos sprays que nos apa 
rcccran cn la base ck la panialla > quc 
euentan con una capacidad total de ein- 
c uc in a di spar os. Con esie poiencia) ten* 
dremos quo aliiiar a una oleada de vein* 
te mosquitos quo Iran apareeiendo suce- 
sivaniente. May que toner oil cuonta quc 
cl dcspla/amicrito del mosquisto por la 
pant,ilia no cs reviilineo, si no quo presen 
la lioetas vnriacioncs, con lo que c<atinari> 
es cueslitm de reflejos v hahilidad, 

Si. a pesar de lodo, miestra punteria 
no os coriera, una plaga de mosquitos do 
otra «ra/a» acabara destruyendo nues- 
trtw sprays ya vacios, \si que, janimo y 
putueria! 


S PPINT ftT 11 r S, 



unit 

COrt 10# 


d 0 s P*fi ittbif 

iciqutur 
23 PRINT t01 SprbV iZ^Ut 

ifae " • P i dt ft thO 

J 0 PRINT ■“ L 01 001401IO* 

*:#n dti d* S3 0 SOt 

-tip eftf £ 3 1 5fl dUPlfOS- 

LC-S IIL#*i til , 1*10 ttnflr il 

P0 f t bIiI#iJiS dt s01^ c vIv1 t . " 

*0 PRINT 


Li 


!«*!*•£ . t= TmCw 30 tq i$ 0 
73 CLi GO iUB 1300 

E0RE-EP £ P.bp£r f tNh O C 

LET C-FO 


A0 LET b>C LET i 
133 LET * a£-9 
110 PRINT PUNTOi 
110 FEINT INK 1 AT 21 0. 

— ^ ^ 

i30 PRINT InTs 1 . AT £0 0 T|^ AT 


:0 1 0 TV 

1+3 ^ET y ■ I NT 
11^ PRINT 


FND#171*2 

AT £1.00;- "AT 21 0 

3 C 

113 F^OIE J-3 BEEP 0*1. £3 

110 LET r.t V LET y.y^LlMT ■ PFJ 3* 

I - - « l^iy. * Ituf 

1^3 PfiltjT n , t , " + * PRINT I 

Z AT y * ■*# 

1^3 I* C "0 Thin print ouer 1 a 



* f + » >jO to B 00 

ale IF INKS - i = 0 Th£ rj PRINT AT 

=0 0 . IN- 1 - PLOT 17,17 DR 

153 152 FEEF PLOT 0V 

CP l : R&U O'.'EF 1 153 153 

F F J NT AT £2 3 I M* 1, T LET C 
- " - L IF £i-v«C OF 2l*V"t + l tm£m 
GC TO *30 

£00 IF INHL ♦ ■“R TWEN PRINT AT 

...2 13 iNt 1 * PLOT »7 17: C; 

Rmi 1T3 lEv^ BEEF ,3MC PLOT 0 
VtP 1*97,17 3 RAU O'JfF 1,153.153 
FF 3NT AT ; 0 . 13 INK 1 T LET 

-a'-i if :i-y= t or n^=eti tm 

£■4 GC- TO *33 
242 EEEP ,01! -l2_ _ „ 

£53 IF ( sO TH Efj PRINT AT y, f, 

GO TO 4l« ^ ^ ^ 

ae-3 LET c m« -INT RN0 + 2» 

2 - 2 &0 TO 103 ^ ^ „ 

+ 33 j-=*l PRINT llir. 0 AT w 

. 0EEP O.3 . -2* PRINT 

AT 3 2 C’U^n-05 S PAUSE 20 P 

PINT AT y.< -1 .■ 

4 12 LET biNi L£T 

*23 I^ f- 19 TmEn CLS Gw TO +4 

'Y 30 ce> to uo . . , „„ 

u: eci^T ftT c .ii iNutPSC i;"C 

o.‘ca tNVCRSe a 

_*50 PRINT flT a , 11 . "PUNT05« rr i.i*n 

* ^ S S6 ’ t - li UM*mmEZmrnA 


7F #*1i? 0R t 1 THEN PRINT 
AT 15.7 . -' C*£ i ' 10 COtli 1 4ut£ 1 1 " 

4^0 S:f s«£2 then frint at is, 2, 

Nil C0ftt«9U}40 J^suuir eM* 

F L J 9 4 . T t MNVtl con &U4 7 " 

4S2 IF 5-6 THEN PRINT AT 15,2," 
C ppr d £ r r 0 C h * d 0 j" *» 

493 F3R rs-LB TO 10 SEEP B + l,f 
BORDER RNt>*7 NEXT F KEP 
17 BOPOCG 7 

533 IF INKE ft Ts-fEN GO TQ 5 33 
513 PAU5E 120 GO TO 00 
603 LET PRINT AT 21,17, 5 

PRAY GAiTAC.0 1 1 M 

613 LET tBl-1 _ _ „ 

622 PRINT Ihjh. 2. AT W.€."MAj* 
A- 17 t * 1 . MCA '■ AT lfr.t+2, 
4 FOR v * 1 TO 6 BEEF .315, 


1 £ PAUSE £ NEXT i 
633 I*’ THEN PLOT 15+.25 D 

Pi- -135 -2 0 PAUSE 3 PLOT OUtR 

: 164 25 C'FAU QUEP 1.-100.-20 

- I 2 : c t * £ 1 then PRINT at 23.0 

AT 13 G " .AT 21 , 10 

0*2 BEEP .015.- 12 

**5 IF t m£l THEN FOR lbI TO £0 
BEEP . 01. i * BOEDER ENT -i . Ji 
lie XT 4 

053 IF 4*12 THEN PLOT 10+ £5 O 
RA1. -10* -23 PftUSE 3 PLOT QUE R 

1 134.25 DHAJ OUEii l -10*. -20 

*£0 IF f " 1 1 THfiJ PRINT AT £3,0. 
AT 13 0, 1 .AT £1.0. ■■' 

tf E5 :f e * ii then for 1=1 to 20 

BEEP - 0 1 . i * BORDER I NT U/3 1 

NEXT t 

£^3 IF tifi THEN CLS GO TO 440 
663 00 610 

1003 FOR '=0 TO 7 READ ffl POKE 
i A + f eg uExT *' 

1012 FijC. 4 =3 TG 7 ABAC- Cfl POKE 
'..".ft e f f . eg tlE -TJ ^ 

13^0 FOP r 70 T D 7 PE A D <9 POKE 

U 5 F C * t <9 NEXT f 

1330 F0P f sO TQ 7' READ C9 POKE 
L'SP D * F . c 9 NEXT F 

13*3 FOR F*® TQ 7 READ C9 POKE 

iciiS rw*i *s fl To N 7 -lT p.iAo eg 

L'SP r W eg NEXT f 

1060 FAR 1^0 7 HERD tg PS*vE 

OSF "5 + f , C« NEXT F 
1370 F^F 4 TO 7 PC0£ POKE 

L 5R - H" + f ■C 9 NEXT f „ , 

13 7 3 F ?F <’ >3 TO 7 PEPD tg POKE 

C£ P I *f.<9 NEXT f 

1005 fob r-0 TO 7 PCflt C9 POKE 
y 5B ‘ J ^ F . C 4 NE XT t 

1093 DATA l,J t * 7, 63 .51. 102 3-*S 
6* 126. 224 . 240,£*0.144.0 

£302 CAT a 1 if 16 . 3 . 3 36.3 r 72 

05,6,0.66^0*06.0.10 
2010 DATA 3.7,14.60,£4B,£46,£40 
2*0,0 , 3E.O.*,6*.0.16,0 
£020 DATA 1£B.□£.12,33 255 H 6 3 1 
.0,0*60i126.£65*1£4.0.64 
2030 RETURN 

£040 DATA 255.2OT.255.2*,2*,2*,2 
J ,24 0,0.0.3.255 H 255 f 255 . 2* 
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REM Somos prcfesionales 
REM Da me|or service 

REM Tenemos (ambn' a n COMMODORE ATARI 


k-cKHtp : 


REPI5HQP 

Ordenadores personales 


RENOVACJON EN MARCHA, S A 

c Espronceda, 34 - 2* mt MADR‘D-3 
Teleiono (91) 441 24 78 


REM SWOP - VALENCIA 

t Maestro Palau. 12 
Teielono (96) 331 53 27 


ATMOS y COLECO HARD y SOFT 


REM SHOP 1 


REM SHOP-BARCELONA 


REM CAMBIO acepta equipos de 2 mano 
al adquirir otro nuevo 


c Galileo 4 MADRID-15 C/ Pelayo. 12 Entresuelo J 

Telefono (91} 445 28 08 Tel (93) 301 47 00 


REM Consultant)!; tus necesidades 


HARD QL 



1 Ql 128 K 

32 Bits * 2 Microdfives 
Teciado espanoi. manual casieJiano 
i Joystick 

1 Impresora serie CP -100 
1 Cable conexion 
t TV color ELSE SHARP 


PRECIO TOTAL 

240.000 Pta*__ 


Sm TV y con monitor alta resoluoOn 280 000 Pt$ 



HARD SPECTRAVIDEO 


1 SV 328 p ,., i a . i m * * ■ *.. * * 

* 

1 Umdad doble discos con 
controlador y salida centronics 
X lTdy StiCk 

1 Impresora CP- '00 


59 900 


148 000 
3654 



TOTAL. - 



PRECIO TOTAL 
251.149 Pts, 


SOFT QL (Incluidos) 

QL OUILL Traiamiento de textos 

Lo que se ve en la pantaiia aparece en Fa 

impresora 

Ql ARCHIVE Basededaios Con lenguaje 
propio 

QL ABACUS Hoja de caicuio 6 QOO ceidas 
programables 

QL EASEL GrafiCOS De barra de tana de 
puntos. de lineas 


REM NOTICIAS 


HEM CLUB SPECTRUM 

Y COMMODORE 

F u ncFCjnn eoroo uri c I ub cfo* v \dec S*' 
adquwrg urn emu y w mrareirrifcin 
Con dtras .1 200 plas SH-mana E p 
emt.15 inqiesas 400 ptas s^mana 
Soso w^iowjs. cngmatas 
QLUfl 

Para usuai 1 ^ dpi QL S^iicria »ntor- 
mafion 

REM CURSQS 

Bji> l 1 ? M C v J(ihc*CiC‘WS 

REM FRANCHISING 

Si ginLvos my mar in prupi.i mmi 
whm dfl informatiEiii o uba henda 
espec id 11 ^aoa. f nw ij ■ i us tu d if etc ion 

V r« I bn.IS nlftrm itnflr complex 

HEM DET ALL 

Sr qu n?r#s vender nut^lfcs pccduc 


to envianos I u difeccion y reahifflv 
minium mfomaciofi 

HEM PE GATINAS 

pifli ■ TiO£3fHC»S REM MEMBER 
ME REM i LOVE YOU REM 
FOREVER 

REM CAMI9ETA5 

990 :mi, "■ modules HEM MEMBER 
ME REM * LOVE YOU REM 
FOREVER Inditar (ana pcquefts 
normal y grande 

REM GRAPH 

Ki[qrflht«6Cdl0r«99©plas -HEU- 
TILLABLE] 

REM GRAPH 

ID ei'-iH.iias seciado feuiikza&'e 900 
pla* 


SOFT SPECTRAVIDEO 

Spectra Checkbook 

Spectra Diary .,.. ...... 

Armoured Assault 

Spectron... 

Norms.... 

Sprite Generator. 

Font Editor ...... 

Spedra File Cabinet .. 

Spectra Type........*. 

Sector Alpha (cartucbo}.- 

Super Cross Force (cartuchoj,., . 


I- 

| BOLETIN DE PEDIDO 

: N £j rflt>f (? V ApellKJOS 

f Direction y TtKIqno 

ji Deseo reciPir mas >nlormac<On 

Oeseo adqjinr 

i Precio total imciuye 300 plas O** gasros de envioi 

: Giro Postal O Giro Teiegra*iC‘i D Transference 8*ncxf .i — 1 

; lngre«o en cuflnta 3769 9 BANCO DE BILBAO di» Rosas 44 

[ M A DR 10-3 

i Taion adjunio D Talon coriTirmarto adjunio C 

j Tarjeta VISA nunnero 

I Fecna caduciriati Fima 


... 2300 
... 2 300 
... 2 300 
. 2 300 

. 2 300 
... 2.300 
... 2 300 
... 2300 

... 2300 
4900 
... 3 500 

PRECIO TOTAL 
26.190 ptfl*. 






































PROGRflMRS 



PROGf 




SUPERGRAFICOS 

Uno de los problem as fundamentales <oa los 
que se encueirtra el sufrido programodor es 
el de disenar sus groficos y pantallas. 
Suoergrafitos, que es la aaaptocidn espanolo 
del Melbourne Draw, nos ayudo a hacerio de 
la forma mas simple y con la liberlad mas 
absolute. 


despazar el cursor hacra 
una de las ochc direcdones 
posibles 

Otra pcsibihdad que mcluye 
el programa es, por ejempia 
el poder jugar con los 
atribulos a nuestro anrop 
teniendo en cuenta. eso $r. 
las fimitac tones del 
Spectrum en este campo 
Tambien se puede cambtar 
el eslado de estos segun 
nos convenga en cada 


Melbourne i_ tnvesnbruca 

48 K _ 

Ttpp: Uhltdades GtAhcas 

FVP 2100 




Se tiiila de la version 
traducida del 


Melbourne Draw. e( major 
programa, con dilerencia. 
que exisle aclualmenie en 
el mercado del Spectrum, 
ademas. uno de los mas 
uiiitzados por los creadores 
de programas, ya que por 
sus condiciones resulta 
Kfdneo para todo lipo de 
creactdn qralico que uno 
sea capaz de i mag mar. 

El programa na sido creado 
por Philip Mitchell y tiene un 
menu completfsirno, con el 
que es pcsibte accede r a 
cuaiquier modo grafico 
\feniana de intormacidn — 
Son las dos Ifneas mtenores 
que se utilizan para mdicar 
ei esiado actual del 
programa Ahi nos ira 
aparecrendo (oda la 
informacrdn necesaria para 
accede r a los diferentes 
mandos y cursores que 



gobiernan el control dei 
programa 

Cursores.— Hay ocho, cada 
uno de el los controla una 
direccidn diferente Su 
distribucibn es muy tpgica y 
el manejo bastante Simple 
Formas de marcar 
pantallas— Ei modo Normal 
con el que se recorre la 
panlalta en la direccidn 
elegtda El modo Dibujo, que 
se uliliza para acfrvar IOS 
pilxes por los que va 
pasando ei cursor El 
Borrado que apaga todos 
los pilxes y el modo de 
tnversidn. que, como su 
prOpiO rrompre indtca. Sirve 
para invenir el estado de los 
pilxes 

Agrandar Cosas— Es una 
posidriidad de las mas 
mteresanies. ya que nos 
pernmie aumentar una parte 
del dibujci con lo cual es 
posibte dibujar con una 
error me precision Se puede 
hacer de 4 a 16 veces 
mayor Ai trabaiar en una 
pequena porcidn de pantalla 
aumeniada. habra veces que 
tengamos que desplazarnos 
desde un bloque a otro de 
la pantalla. lo que hace et 
programa de forma 
automdtica Tambien May 
una forma aun rrps sencrlla 
de conseguirla se trata de 


bloque de dibujo, 
accediendo a ellos de la 
misma forma que lo 
ha names en el mdtodo 
direct© de obtencvdn del 
color. 

Se puede rellenar un area 
de pantalla delimitada por 
una serie de linear de 
forma automat ica El meiodo 
no results demasiado rapido. 
pero esto es lOgico ya que 
se ha hecho con ei fin de 
poder detectar los posibles 



errores y poder corregrrlos 
con tiempo sufiaente 
Cuando queramos incluir 
textos en la pantalla, 
emptearemos la opcidn 
cor respondienie. la cual nos 
permits escnbir caracteres 
allabeticos en mayiiscula. 
en rmnuscula, nurmeros. los 
simbotos rpjos de la parte 
superior de la tecla y ios de 
la parte inferior Esta opcidn 



nos permite lambidn teclear 
los caracteres delinidos por 
el usuano fUDG). 


Ei despiazamiento del 
conlemdo de pantalla 
(SCROLL), es otra de Eas 
maraviilas de este programa 
Nos permite cotocar cosas 
donde queramos. en 
cualquiera de las ocho 
direcdones posibles El 



despiazamiento puede set 
de dos lipos, punto a punta 
alpgtar a IPS etnbulOs o 
despiazamiento de esfos 
uliimos 

Los caracleres UDG, se 
pueden definir a travGs del 
programa y grabarlos 
posterior me rite para 
utilizarlos en nuestra 
pantalla 



Otras opciones posibles, 
adem£s de todas las 
resefiadas, son. por ejemplo 
Mover la ventana de 
mformacidn de la pane 
inferior a la superior o 
vice versa Acelerar el 
movim lento del cursor 
Contraer y expander la 
pantalla y, si se desea. 
inveriir de rzquierda a 
derecha la panialla 
Ei programa es 
compleilsimo en todos ios 
seniidos y, ademas. una 
inestimable ayuda para el 
programador. que lendra 
toda la iibertad de 
niovimienfos que pueda 
imagmai a la bora de crear 
sus grahcos y conlecoonar 
ias pantallas Muy bueno. 
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AD ASTRA 



flO ASTRA"* 


Es un fuego dentro 
do la mas pura 
ifnea del esiiio Arcade ya 
que la accidn se situa en el 
espacio gniaciicc y nuestros 
enemigos son cenienares de 
naves que sure an la front era 
del espacio conqyistado por 
k>s lerrestres 
Nuestra misidn es la de 
impedir que at ravin sen 6sta, 
rrienlras viaiamos de una 
estacidn mterespaciai a otra 
Los enemigos surgen de 
todos (ados intentando 
desirmrnos: cruceros piratas 
robois de bareos Scout, 
bombas exptosivas 
multidirec cion ales, 
gigamescos campos de 
mtnas impenet rabies 
codinas de bombas y mmas. 
y los peligrosisimos 
meteoros errantes que 
surcan el espacio en lorma 
de despojos mieresteiares, 
que pueden chocar. en 
cualquier momenta contra 
la nave palrulla que 
difigimos. 

El juego es baslanie drficii. 
sobre todo lemendo en 
cuania la rapidez con la que 
nos movemos, tanto 
nosoiros como nuestros 
enemigos en este aspecto 



nay que resaliar 
piecisamenie que el 
movtmiento esia muy bien 
logrado y es basiante buena 
la respuesta de los consoles 
en todos los aspecioa 
Graficamente el juego est6 
lambibn muy bien. los 
meteonto& naves y demis 
artilugios Irenen un diserto 
muy apropiado para esfe 
upo de juego. dandonos la 
sensacion en lodo memento 
de esiar librando una dura 
batalia mierestelar. 

Es posibie la utiiizacibn del 
Joystick, lo que lacilita algo 
ia compiicada tarea 
Tambien incorpora la 
posibitidad de jugar dos 
jugadores 10 que da cierto 
alicrente a la partida 
Un juego puramente Arcade 
en el que las fluvias 
coniinuas de enemigos y 
objetos peligrosos. van a 
poner a prueba nuestra 
capacidad de retlejos No 
hay ni un momenta de 
descanso durante toda la 
partida Recomendado para 
los mas habiies de la casa 


MANAGER 


ERE/Sotlware Center _ 

48 K _ 

Tipo de juego Simulator de 

empresas _ 

PVP 3000 ptas 

Es un programs 
educative que 
pretende mtroducirnos en el 
compiicado mundo de ia 
gestibn de empresas a 
travbs de un iuego ameno 
que Simula los cases reales 


que se produc irian si 
dingibramos una empress 
Nos permile enfrentar a los 
disimlos aspirantes al puesto 
de director, propomendoies 
situaciones srnnu fades que 
van a servir para medir las 
consecuencias econPmicas 
de sus decisiones 
Pueden jugar desde uno a 
cuatro jugadores. los cuales 
tendrbn que asumir los 
diferenles papeles 
pnncipates de a socredad 
President de la soaedad. 
Presidente de Produce i6n. 
Director de Marketing y 
Director financiero 
Cada inmesire. se reunira ei 
Gomiie Director con el hn 
de anoiar los resuliados del 
Inmesire anterior y lomar 
decisiones Una vez se 
hayan tornado 6slas, el 
programa Simula fas 
consecuencias econdmicas 
que se donvan de las 
decisiones adoptadas 
antenormente y las relieja 
dentro de los diferentes 
elemenlos que integran el 
cuadro de mando de a 
Direccidn propuesta por el 
Comitb DireCtiVO 
El anaiisis de dichos 
cuadros a cargo del nuevo 
com 1 16 per mite lomar 
posterlormenie nuevas 
decisiones para el proximo 
eiercicto inmestrai 
Depended del anSfisis de 
resuttados de cada inmesire 
la puniuacibn que 
obtengamos, la cual a su 
vez. sera la que se 
encargue de medir la 
calidad y acierio, o no, de 
nuestra gesiibn 
Ex isle una posibiiidad. 
dentro de cada e|ercicro de 
que credos acontecimientos 
que vienen del exterior 
periurben el analisis 
realizado y ocasionen 
retrasos en nuestra geslidn 
At igual que ocurrlrta en una 
empresa real, puede 
producirse una inflacion. la 
cual nos iiegar6 de lorma 
ateatoria y puede original un 
aumento de los cargos de la 
compaflia Ademas de esto. 



se producira un desgaste 
del material de produccion y 
Hegarb un momento en que 
se produzca un desfase de 
actualizacidn de material, 
que infiuirdn sobre las 
venias del articulo 
Es un juego muy compieto 
que nos va a ayudar a 
comprender mucho meior ei 
compiicado mundo 
empresariai. adentrandonos 
en ei de una forma basiante 
esara y a la vez enlretemda 
Ef programa eslb, 
educativamente muy bien 
pensado 

Como en la mayoria de los 
luegos de esie tipa no tiene 
grbficos sin embargo esio 
no es n mgun mconveniente 


MELOTRON 


tnvestronica 


48 K 


Tipo' Oidaciico 


PVP 1900 gtas 


Es un pequeno 
tratado de solfeo 
que aprovecha las imnitadas 
posibilidades sonora$ del 
Spectrum con el uniCO fin 
de ofrecemos un programs 
musical que. a la vez 
resulte entretenido para 
todos 

Nada mas cargarfa lo 
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primero que aparece es un 
menu con ires opcrones 
Pile rentes Un tec I ado 
musical, seguir condones y 
componer musics 



La pnmera opcibn convierle 
nuestro ordenador en un 
instrument musical capaz 
de genera r 109 sonidds 
ditoremes. en nueve esc alas 
diaionicas de doce sontdos 
Iprmados por siete notas y 
cmco alieraaones Cada 
nota que (ocamos es 
visualizada en panialta con 
ei nombre cor respondent© 
Puede elegirse la duracrbn 
de cada nota enire una 
©seala qua contiene 9 
valores diierentes Otra 
posibitidad es la de 
repeticidn opcionai 
La opcibn de seguir 
canciones consisie on 
escuchar una serie de 


paniaila las leclas que son 
necesarras tocar y 
tendremos que darles la 
duracibn exact a. una buena 
forma sm duda de aprender 
a manejar el rilmo 
La tercera posibiiidad, es la 
de componer musica 
Dontro de esta hay a su vez 
ires posibilidades distmtas. 
Composicibn grbfrca sobre 
penlagrama. composicibn 
rapida y control de almaoen 
Se puede componer, 
reiniciar una composicibn, 
modificarla. tocar la, 
aimacenarla o sacarla por 
impreSOra Qtra posibiiidad 
es la de componer de forma 
automblica, en cuyo caso es 
el propio ordenador el que 
compone 

Adembs de todas las 
opc tones mencionadaa 
existen algunas mas que 
nos perm i ten diterenles 
convmaciones de meiodo 
que, unidos, pruducen 
efectos sonoros muy 
cunosos. 

La idea es buena, el 
planteamientq cor recto y los 
result ados acepiables por lo 
que puede resultar un 
programs idbneo para 
aquelfos que quieran 
infciarse en ei apastoname 
mundo de fa musica o aiin 
no conozcan 

sulicrentemenie el invent© 
en cuestibn 


melodias y poder ver 
aspectos importer tes sobre 
ei tono y el ritma ya que 
podemos eiegrrtos antes de 
empezar a escuchar ia 
musica. Si To que queremos 
es mierpretar nosol ros las 
melodias, nos aparecer&n en 


SERLOCK HOLMES 


Melbourne House _ 

48 K __ 

Ttpo de iuew Aventuras 

PVP Sin conhrmar 



■ Los creadores del 
Hobbit vuelven ai 
ataque despuesde aigun 
liempo con esta nueva 
creacibn, que, a I igual que la 
anterior, reune los mismos 
ibmmnos de atmbsfera y 
sofisticaetbn. Uno de I OS 
rasgos mas sorprendenies 
es ai igual que en ei Hobbit, 
la libertad de accibn de 
todos los personajes que 
mtervienen en el |uegct es 
decir, bsios pueden hacer 
cuaiquier cosa que se nos 
ocurra por muy compleja 
que parezea Se puede 
mcluso tiegar a interrogar 
otros personages 
El programa per mite at 
jugador inciuir (rases con 
toda natural! dad, como podia 
ser por eiempto *Abre la 
puerta rapida mente, sal y 
coge un laxi*. Esta abode 
un gran reaiismo a la accibn 
principal, to que, undo a la 
posibiiidad de hacer 
pregunias, dotan ai juego de 
una enorme comptejidad 
El juego comienza en et 
estudio de Holmes, en Baker 
Street, con Watson seniado 


■ ■ ■ < 'otti'n nitnore\ de que algunas tie fas prittopotes entprtsas es;wftolas impoetadoms i 
prvduetoras de Software tune ft intent ion tie mantener conwrsudanes tun et fin de mtentar. 
tie forma eonjunta, /miter freno a in incipienie piraterfa. 

■ ■ ■ Dinamie pre/kira tin twevo prvgruma que cast seiiurv tlevani et liruto de 
*/ t rofanacidn». Et juego esta ambtenfado en Egipto v. mas eoneietantente, en et lernph* de 
Atm Simhel 

■ ■■ esta en Es/xmu una tie fas mus espettact*fairs creacianes de Ultimate, *h flight 
tore-, un jueeo revotuctonarto en todos tos sentid&s. 


en un silibn leyendo un 
peribdico A partir de ese- 
momenta lodos nuestros 
esfuerzos han de if 
encammados a descubnr un 
horrible crimen, en un 
compticadsimo orgamgrama. 
donde las prstas aparecen y 
desaparecen contmuamenie 
Hay un retoj que nos marca 
ei hempo Iranscurrido 
indrebndonos la bora, et dia 
y ef minuto mds prbximo 
Este dato es muy important© 
sobre todo si lenemos en 
cuenta que para cogei un 
Iren habrb que hacerlo a 
una hora en punlo, ya que 
de lo contrano to 
perderiamos. 

Para andar por el Londres 
Victonana que es el fugar 
dorde se desarrotta la 
accibn. tendremos que 
utitizar el Metro tos taxis y 
los autobuses 
Los gr^ticos del programa 
ocupan tan sbto un cuarto 
de paniaila. sm embargo 
estdn baslante bien 
const ruidos 
Denlro del juego se 
producen coniinuamente un 
enorme numero de posibies 
casos complicados, los 
cuales guardan un sen i do 
de mteraccibn que 
comphcan aun mis la trama 
de tuego En este caso al 
contrano que lo que ocurria 
en el HobbyL ni siquiera 
leyendo un libro con 
antenondad hubiera sido 
posibte conseguir un 
conocim lento exhaustivo del 
tema 

El programa ba sido 
desar roll ado durante 
dieciocho meses. y 
poster lormenle tardb en salir 
seis en Ingiaterra A la vista 
de los resuiiados. ha i/alido 
la pena su realizacibn Esti 
esc r i to en mgtbs, to que 
puede ser un inconveniente 
mbs a unir a La enorme 
dificultad. pero viene 
acompabado con un 
complete manual que 
coniiene algunas pistas en 
lorma de ejempto Ai menos 
en Ingiaterra 
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SOFTWARE 


Z-80: SISTEMA 
DEINTERRUPCIONES 

Tol vez hayamos leido en alguna revista o tibro, o 
alquien nos ha comentodo algo sobre las 
«irrterrup(iones». Pero, ^ue es eso?; £patti quo sirve? 
y sobre todo £<6mo se utilizer! las interrupiiones? 


En primer lugar hay que cxplicar cu<ii 
es el concepto tie interruption y para ello 
Tiada mejor que un ejemplo: 

Supongamos que esta sentado frente 
a su Spectrum prog ra mad o (o mas posi- 
blemeute j Uganda a alguno de los jue- 
gos que esta revista ptihEicu) y, en esc mo- 
mento se oyc ima vo/ que nos grita des- 
de cl pasillo: ;l a ccna esta liqa! 

Entonees nosnaos aicndercmos la «jn- 
terrupci6n» t es dedr, cenaremos, y muy 
posibiememe, scguircnto* iuego con 
imestra tarea. ;st no nos «dcsconcetam», 
claro! 

Pues hien, el / 80 puede atender a la- 
teas que recta man su aiencidn. ejccu tar- 
las y iucjzo segtiir eon lo que esiaba ha 
cicndo antes. Y esto es lo que haee nues- 
tro Spectrum cuando por ejemplo, lee el 
ted ado; dneuenta voces por segundo, ei 
ordenador para lo que cstc hacienda, lue- 
go lee el (eel ado y aumonta en into el 
conjunto de (res bytes formado por la va¬ 
riable del sisic'ma FRAMES v* despues 
sigue ejecuiando cl programa interrum- 
pitlo, 

Dos tipos de interrupciones 

El X-80 dispone de dos tipos de ime- 
mipeioncs: una enmascarable y otra no 
enmascarable. Cada una de estas inle- 
rrupciones esta asociada con una «paii- 
ta» del /-SO. Una imenrupcion enmas¬ 
carable es aquclla que se puede delicti - 
var o activar a voluniad del programa* 
dor y esio sc hace con las itistruceiones 
Dl y El respectivamcntc. Es deeir, si cu 
medio de un programa sc pome la instrue- 
eibn Dl. a partir de esc moment© no se 
atendcran las llamadas producidas por la 
aciivacidn de la «patita» correspo ridicu¬ 
le* l.as inter rupeiones volveran a at endor¬ 
se cuando se eject;te la imtrucdbn EI. 
Una interrupcion no enmascarable se 
atendera siempre que se active. A part ir 
de ahora, solo lomarcmos en cuenta las 
interrupciones enmase.'irables, que son 
las unicas que se pueden utilizer con d 
Spectrum. 


El /-SO tiene ires modos de cjccutar 
las interrupciones de las cuales el Spec¬ 
trum solo nos permue ulili/ar dos. cstos 
modus se conmutan cut re si con las ins- 
trued ones IMI y I M2, 

El Spectrum esta normalmeiKe en d 
mode 1. En estc niodo siempre se ejeeu- 
ta una instruccidn de RST 38. Es deeir, 
como cada emeuentavo de segundo se 
produce una interrupcion, csto hace que 
siempre se ejeeute un salto a la rutina en 
ROM que eomieit/a en lu direccidn 0038 
h. ( v es esta rutina la que se encarga de 
leer el leclado y de aetuali/ar FRAMES. 

Vcamos como se utiliza cl modo 2. In 
esle caso lo prmicro quo hace el Z-80 es 
for mar una direccidn con el legist ro I y 
con los datos que, en esc momento, es- 
ten presettles en d bus de datos;. En cl 
caso del Spectrum este ultimo byte ten¬ 
dril siempc d valor FFh en esc momen¬ 
ta l iiega d Z-8G ir.i a esa direccidn. Ibr- 
mara una nueva direccidn con d conte- 
nido de esos dos bytes consecutivos y oo- 
men/ara a ejccutar cl programa a partir 
tie dicha direccidn, Por ejemplo: 

El regisiro I contienc el valor t Eh, 
l a direccidn FEFFh tiene DOh 
La direccidn FFOOh tiene 4Ah 

1:1 Z-80 ejecutana un salto a la direc¬ 
cidn 4ADOK y rclornaria al programa in- 
terrumpido, cuando se encuentre con la 
instruccidn RET I (Retorno desde Intc- 
rrupcidn). 

Vcamos un ejemplo de utilization del 
sistema de interrupciones en d Spectrum. 
El programa permite teller un rcloj en la 
esq u ina superior dcrccha v la vcniaja tie 
haccrlo usando las interrupciones es que 
nos permite osiar reali/ando otra tarea 
mientras el rcloj furtciona independien 
ternente, )>c todas formas hay que haccr 
noiar que el rcloj se pamra con aquellos 
programas que dcsactiven las interrup¬ 
tion cs. como por ejemplo, las rutinas de 
LOAD y SAVE, pero el rdoj continuant 
despues de terminada estas rutinas. Otra 
«pega*> es que si haccmos NEW debere- 


£ 




mos vo her a imcmn/ar el rcloj hacicndo 
RANDOMIZE USR 65517, 


Las direcciones que intercsan son: 

— 65426tl . Aqui se alma- 

cenan los se- 
gundos. 

— 65427d . Minutos, 


— 65428d . Horns, 

Haciendo POKE en estas di feed ones 
pond rent os en bora d rcloj, El rdoj co- 
men/ara a marcliar cuando sc ejeeute d 
programa almaccnado en la direccidn 
65517 {rutina de activation). 

Estecs el listado del programa BASIC 
t|uc carga todo el programa: 


* m* ri«Sft oj **• 

10 DATA ”GlFFFOFSESC>3e32i0lFF3 
4lS3&tJ£i^33* J 3t 3CBC2CI laaee 

194FF3E173a90FFesCD3 

3^ Dnrn 

aFF3C03CDfinFFei20CC>3aFFCiOlClFlF 
F " 

4.0 DATfi "ED*DE3 7CafiFF2*D60 A30F 
KMfl 3F ?t C3CD3«FFtl ?&CD^AFFE 1CM 

7" 

BS DATA ■O7072195FFL6&03F19E3D 

3" 

60 O-ATfl ■■ 

00000000^" 

70 CAT A ! -7CeaC*C6CfiC66A7C0206O 
602020&36027C3P067ABCC3BO7C:’ J 

DfiTA ’7C3B(J63A7a063ft7COaC©C 
66fl7A0636027CE>eC-05C7R063A7C“ 

DATA -7Ce&C0BCaAC60fi7C7C3ifle 
606020&060£7CeAC6SA0flC6Bi=^7C ,, 

100 DATA "'7CBACeefl7A053B7CO01*l 
003001 ft leSOMFEEDi TEMeM" 

110 AC3TDHC 
US CL3 

1^0 I^CT D *63270 

123 PBIhT TA0 ACLOJ *** 

13* FOR 1-1 TO 10 
133 READ fll 

140 FOP ^J-l TO LCKI At &TEP 2 

ise let m*i^n-*s-7 

» IfiiSJ) >' 9 r, u _ 

160 LCT XMCODF 
[A# CJ+1J j- * J 9" ) \ *X 
170 PQKt Dj X 
13® L&T D-D + l 
193 NEXT J 
^■0* NEXT I 

£10 PRINT AT 2@ , 0. ‘PU( I 11 »D r> & 

r* 

220 IHPUT “HORS -,n 
230 PRINT RT 21, 4. H, 

240 INPUT ‘NINUTO "< H 
230 PRINT " H, J! GO" 

260 POKE 03426,0 

270 PONE 63*57 d h 

260 POKE 33426 r M 

293 RANDOMIZE U3R 65317 

£90 PflU6£ 30 CL3 
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DIR. iCOUGO iUSTADO DIR. ICODIGO USttOO 



OHG FEFF 


7E 


LD A, (HL) 


FEFF Of FF 

DWOM CEFW FF01 

(Dtactifl fie 

26 FF 


lDh.Ff 

Carga H eon -1 



cwnienzo 

FF56 24 

R10 

INCH 

.Caicuio del diqitc en 

FFO! F3 

COMIENZO Dl 





BCD 

F5 

PUSH AF 

Guards regislros 

D6CA 


SUB OA 

;mss srgnilcacvo 

£5 

PUSH HL 


30 FB 


JR NCftlO 


D5 

PUSH DE 


C6 0A 


ADD A, OA 


c& 

PUSH BC 


6F 


LD LA 

Aimacena el resla 

21 91 FF 

U) HL, TIWE 

;Aclua!irar 1'50‘avos 




eni 



de 

70 


LD A.H 


3* 

INC iHLl 

isegundD 

E5 


PUSH HL 


3€ 33 

LDA32 

;Sf no se ha Itegado 

CD6AFF 


CALL CHR 

Ilmpfime el conienttio 



a» 




tie H 

BE 

cp m 

;if a la rutina tie 

El 


POP HL 




impresitin 

7D 


LD A.L 


301B 

JR WZ.tMP 


CD 6A FF 


CALL CHR 

: Imprints el COntenKlO 

36 00 

LD lHLf.00 

.Foxier i'50'avos a 




tie L 



ce*> 

El 


POP HL 


n 

INC HL 

.Sumar un se-gundo 

C9 


RET 


34 

INC (HL) 


FF6A W 

CHR 

RICA 

-Mulfiplica per 6 el 

3E3C 

LD A ,3C 

:Si no se ha negado 




contends 



a GO 

07 


RICA 

;del acuTOjIatiof 

BE 

CP |HL) 

isaliar a la ruiina tie 

07 


RICA 


2012 

JR NZJMP 

jrnpfesibn 

21 95 FF 


L0 HLCARC 

■Caleulo tie la 

36 00 

LD (HUOO 

;Poner segundos a 




direcckm 



tero 

16 00 


LDD.0Q 

:del primer byte tie! 

23 

INC HL 


5f 


LD IA 

ca racier a imprrnur y 

3* 

inc m 

;Sumar un mmtito 




almacena' 

BE 

CP (HL) 

;Si no se ha ilegatio 

19 


ADD HLDE 

*«n DE 



a 60 if 

£5 


PUSH HL 


20 0B 

JR NZ.IMP 

:a la rulina tie 

Dl 


POPOE 




imprest™ 

3A 90 FF 


LD A,(XPOSi 

;C^eulo de la direc- 

36 00 

LD (HL).OO 

iponer minulos a 




cion de 



cero 

6F 


LOLA 

stnbuios 

23 

INC HI 

.Sumar una hora 

26 56 


ID H.56 


34 

INC iHlf 


36 36 


LD lHLI.36 

;Por.fr INK negro y 

3E 18 

LD A16 

.Si no se llegado a 




PAPER Waned 



24 horas 

26 40 


LD ft 40 


BE 

CP (HLI 

.saiiar a la impresttn 

06 06 


LD 6.8 

.ColocKtin tie 8 

20 02 

JR NZJMP 





bytes consecutiws 

36 00 

LD IHU.OO 

.ftwer horas a cero 

FF82 1A 

Ell 

LD AJD£] 

a paitir tie DE en la 

FF2A 210JFF 

IMP ID HL.TIME+3 

.Career HL cm la di¬ 

77 


LD (HU.A 

: pan rail a 



rection tie las boras 

24 


INCH 


3E17 

LD KM 

tCargar XPOS con la 

13 


INC D£ 




posim 

10 Fa 


DJNZETt 


32 90 FF 

ID IXPOS.I.A 

;dontie «imfuiniri 

3A90FF 


LD A.iXPOSt 

.Increnter la posicitin 



el 




del 



: primer caracier 

3C 


INCA 

icarictef a imphinir a 

E5 

PUSH HL 

:Uamatia a ia rutina 

32 90 FF 


LD KPOSfcA 

.conimu&tidn en uno 



tie impfimir 

09 


RET 


CD 52 FF 

CALL COS 

;ei eontenido tie hl 

FF90 00 

XPOS 

DEFBOO 

:Direcci6n tie panlaHa 

3E0A 

LD A.OA 

ilmpresion (Ml skjfiO 




.Se unpnmirA el 







prtidnw 

CD6AFF 

CALL CHR 





;caracler 

El 

POP HL 


FF91 30 0000 00 

TIME 

DEFB 00 00 DO 00 

Variables del liempo 

2B 

DEC HL 

llevar a HL la 

FF95 7C BA 0606 

CARO 

DEFe 7CBA 06C6 

Delimctdn tie los 



direccitin 

C6 0G&A7C 


C6 06 BA ?C 

:caracteres 



;de los minulos 

02 06 06 02 

CAR1 

DEFfi 02 06 06 02 


E5 

PUSH HL 


02 06 06 02 


02 06 06 02 


CD 52 FF 

CALL COS 

llmprimrr el contemdo 

7C 3A, 06 7A 

CAR2 

DEFB 7C3A06 7A 




deHL 

BC CO B3 70 


BCOOB8 7C 


3E OA 

LD AJOA 

;lmpf|fnir 

7C 3A06 3A 

CARS 

DEFB 7C 3A 06 3A 


CD 6A FF 

CALL CHR 


7A 06 3A7C 


7A 06 3A 7C 


El 

POP HL 


82 06 C6 BA 

CAR4 

DEFB 82 C6 C6 BA 


28 

DECHL 

■Lieviar a HL la direc¬ 

7A 06 06 02 


7A 06 06 02 




tion tie tos segundos 

7C D8 CO BC 

CARS 

DEFB 7C D& CO BC 


COHFF 

CALL COS 


7A 06 3A 7C 


7A 06 3A 7C 


Cl 

POP BC 

»Restaurar el coniem- 

7C BB 00 BC 

CARS 

DEFB 7C B6 CO BC 




dode tos 

BA 06 BA 7C 


BAC6BA7C 


D1 

POP DE 

■registros 

7C3AO6 06 

CAR? 

DEFB ?C 3A 06 06 


El 

POP HL 


02 06 06 02 


02 0606 02 


FI 

OPO AF 


7C BA C6 BA 

CARS 

DEFB 7C BA C6 BA 


FF 

RST38 

Rulina ROM tie lee- 

BAGS BA 7C 


BA 06 BA 70 




lura del 

7C BA C6 BA 

CAR9 

DEFB ?C BA C6 BA 




iteclado 

7A 06 3A 7C 


7A 06 3A 7C 


ED O 

RETI 

:R&tomo desde 

00 18 IS 00 

CARD 

DEFB 00 18 18 00 




interrupcitin 

00 18 16 00 


00 18 1800 


FF62 E5 

COS PUSH HL 

Esia rulina primero 

FFED 3E FE 

ACT1VA 

LOA.FE 

.Rutrna tie ActivaciOn 



para el 

ED 47 


LDLA 

;Carga l ton la 



inumeK) binario Con 




dineecitin 



■emtio en 




.tie ia intemjpciOn 



:HL a un numero en 

ED5E 


IM 2 

MOtiO dt ir-terrjp. 



BCD. lambien 




tiOn 2 



xomenitio en HL 

C9 


RET 
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PROGRAM AS DE LECTORES 


OUMPUS 


Jorge MARANON 

Situemovios en la antigua Greda <uando las Olimpiadas 
(onvulsionaban a sus hafaiteirtes creando on ambiente 
de expectation que ha I lego do has to nuestro dias. 
Como ententes, la mision del atleta sera transporter la 
ontenha olimpica haste su ubriacion definitive. 


Premiado con 15.000 ph. 


Pcro en esta oeasii'm, ha de enl rcntar- 
sc a uiui prueba adicionai: la amcna/a 
de los dioses. en especial del dios Zeus 
(nosotros) que, enbireeido, no cesara de 
enviar ravos para dcsiniirle. 


Nuestra mision como «divinidad» se¬ 
ra la de acinar y desmiir at cs for/ado 
aileta antes deque logre su objetivo, pa¬ 
ra lo que coniamos eon quince ray os im¬ 
placable^ y con cuairo mundos para eje 
cmarlo: i, 2. 3 y J, 


i f,S Its iSS 88 ?8»il” .. 

4 LET MiHtl IF THEN GO 

TO DO 00 

5 n=T TO 17 PAINT AT n * 

, inf. a, Pape;* e, wight i 
NEXT n FOP r.£l TO 5 BEEP ,?Ct. 

BORDER INT lAND*7i PR> NT A 

T ie. r . INK I NT iptir - 6 I 4 i, 

NOT r PRINT I9-f 

ftrj[ 


HP 

NT 


--17 P 


FOP n 
Mp£fi 0," 
O. Il* - 


to r 

nB'» 


PAPER 0 
PRINT AT ffc.f 
PRINT AT 




111 

TO 


* BORDER 0 00 TO If „ ^ „ 

© LET |*i*l FOR nijO TO o 5T 
£P -5 FOR yai Tq 255 STEF cf 0 

ut . y j?£ep ,00s,0*1-5 cut £ 


54,0 P^E-T V NEXT n PRINT AT 2 

r,U. IN* ?."3LCAN2B&0& "OTP* s. 

<*»T .T n 

NEXT rr IF **10 THEN 00 
TO *000 REM i in 

10 BORDER D GO TO 7 

1.1 LET y s ^ LET v-0 LET *.*0 _ 

THEN ^ET c=£*1 

15 LET IF^a-1 THEN PR 

INT AT 15,0 LET £-31 LET 

■ * 1 PRINT AT 17,0-. AT |fi 

0, ,nT ISO ,AT S®, 3, INr 

0, PAPER 7., WIGHT I ESTAblOS " 

U IF jil THEN LET i|r * B ” 
LET p*ji» * - LET _,=0 GO TO £0 

IS LET i ft " % " LET F |«’' * 

LET Jel 



N0TAS GPAFICA5 


RBCOEEGHI JFL ft N 9 

4r ft » *L : I 1 I A \ G 5 * > 


£0 PRINT AT 17,C INK 3, PAPER 
O BRIGHT I," if ■ l AT 10,4. Pl-g 
T 16,£. INF INT iRN&*3>*£ II EE 
ER , 003 , el? 

30 IF then GO TO 1000 

40 IT INK E Y § ■"1" THEN LET r ■£ 
GO EU& 4 

41 IF INK£,*,"£ THEN let r*l2 
GO SUB 4 

4£ if i?4ke f= a- then let .-aia 

GO SUB 4 

*3 IF iNftCVti 4 " THEN let r 
GO SUE 4 

4- LET n ft ir f . 31 1 *n * 1 1 TO 311 
PRINT AT 7 . 0 . INF 5 PftfEfi 0 ,r>f 

Sin'■j.-i* i te* t **♦*#» + * »*♦* ** 

" loo i-btb 57,as 4i . 23 , 231 , 10 *.ie 

i ise . i.ee.ii* ioi.iM.fi is.. :7. 

lie C'P+a o . Ifl4 , via . ue ,a,e r 

1,21,20,36,36,24,2,6.1 
120 DBTfl 00,60.60.60,30,60,60 A 
0 ,60,60,60,66,126.126.265,235.25 
S,335,24.36,210,36.04.233 

iae 6t*rk 1 , 3 , 6 . 12 , 23 , 30 , 101,255 

, 120,102,06,40,l5a,70,17*,253 
140 DflTft 31,32,143,136,133,60,6 
Q,36,36,107,56.0,1,3*,150,97 , 121 
,134,0,0,20,12,16,223 
1*5 6nT0 120,90,236,210.09.32 1 
6,7 16.32,6*.60,6.00,4.0 

1*4 B43Tl6fi:E 

ISO FOB n >9 TO 119 Re«t' 4 P D K 
C USB *"+n,q, NEST n 

160 RETURN 

20C BORDER O PRINT RT 
7, P-wPfP 0. BRIGHT 



PR 


r afl F e/ H 

. BORDER b 

iie PRiHT «t ij, ink; 

BRI GHT 1 ,- JU I*® 







«T 4,10, 


JNP 7; RBPER 


V r Kl « J'-i ’ J J. Q , IfiT 

afes PRINT At ii.B, INK 6 j PAPE* 
S, 1 '© OFTUflftE© J.HINMO 
10B+- 

SGe RETURN 

300 PAPER 0 BRIGHT 1 CLS 
315 PRINT RT a*IB, INK 6,0 L I 
H P U 3" 

G 1 & PRINT RT *.0, INK S. "LO i di 
0113 ‘jf tn I 1 PIU 4 L H diOt FEUS 
tf tin Mf u «i cogotf df lift 0*. 
mpudif y hin dtodide t * t r C C 

tar in Nil it ■ i ft iljtr 

o om^iCO-" PAUSE BOD CLS 
317 PRINT AT 1-0,0, Ink &, 'LOi r 
lyoi ft* diipirin con m t*<l 
tl l-a-3-*" # AT 16 .. 0 . INK 4 
POP* et diiOi Ftui d* 1010 IS r«v 
d* PAUSE 3B0 CLS 

S-FYlifiFJ 

1050 FDA n*l TO £0 BORDER * &E 
EF BEEP 3 NT iPND*3^ ID 

, INT [RNDeBBl: BEEP .01.n*3 BOP 
Oefi £ NtxT n 

1100 PAINT AT ia,B. X,*r 3, BRIOH 
t i "Ei, PififtAjcro olmpico hi po 

?: a 8«sw a* 

EA 7 . ” U I U A N L fl S 

OL IHP I A D A S” 
1300 PRINT AT £0,0. INK 7, FLASH 
,nlir OUC JUIOO 1 

F(JP r,-1 TO BOO NEXT n PAUSE 
0 CLS GO TO I 

3000 FOR rt»l T£> S BEEP . 01 F n *ft 
NEXT n PSINT AT 12,7. INf 7, B 
RIGHT FLASH 1,"SC ACASA&ON lO 

S RAY ITOS" 

J1O0 PRINT AT 14,0, INK 5/TuUt 
«rtttf p#f4 01^4 ClfTtf* 1 FOP n 
= 1 TO 600 NEXT n PAUSE 0 CLS 
GO TO l 

S 0 OO FOP TO 10 BEEP . 0 i,n 

BEEP .OSS INT fPND*30’ BEEP ,01 
, n + 10 NEXT n 

dlOO PRINT AT INK a, PAPER 

7 r FLASH l BHIGHT 1, LPi 4l Q ft € 

f n * h vihCHO/' 

©200 PAINT AT ia.O, INK 7i FLASH 
I "PUlii *n|*r p*r+ Q\n> 
e. FOR p=l *0 BOO NExT n FAU 
BE O CLS GO TO 1 

B3M PRINT AT £0,0 r INK £ , BP IGH 

t i Flash i . pnUe t n t* r mm o 
us :«rr ui tl PAu^E O Cl; 5- 
GO TO j » 
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PROG RAMA DE LECTOR ES 




CONTABIUDAD 

CASERA 

Pedro VALDEOLMILIOS 
MARCALEF 


* LET pfiftt* 

BRIGHT 0 

nl/ J tto 

- PAU3 

BRIGHT 0 


49 tNr, 0 BORDER £ 
r kQ LET p f ifM,* ra*0 
15 OUER 1 FLASH O 
245 PfiU^E *3 PRINT 
PUL5A UNA TECLfl Bn 

e 9 

90 0U£R I FLASH 0 SLIGHT 
100 IfiPUT AT 0.0 “SflldO d«l ■«* 
mUMor "* iJ J4 LdOtnt PAUSE 20 
105 LET iit^balAUOlM LET C *ri 
t-0 , , . 

110 INPUT AT 0P0 "CuifttOi MUi 
w*i * inifflduiif^^ nyiinoi IF 
numditQia^ THEN GO TO llQ 
115 PAUSE £0 INPUT AT 0.0.“GUI 
file* tJiiittn' 1 " j IF 4* 

0 THEN GO TO 115 
120 OIH £ i ftyfcd AtOl . *' DlH <±^A + 


II 
125 
120 
1 TO 
XT n 
1 4 
155 


BOEDER 1 
FOP ft * I TG 
a LET c Cfi, 


nuitda lot FOR 
mi=0 NEXT » 


• ■ 

NC 


PAPER 0 CLS 
■3v«ffis c*Pifi per 
U la b LA <$t t »<jv p 


HND iNhEYfO 
THEN LET p f i A 


BORDER 0 
PRINT D0. 
ifef>rtiar| dt 

El ft** „ Pl 
156 IF INKM^ i 
"ft 11 THEM GO TO 130 

:f inkcy**^*- 1 

It r at l 

145 GO 3U0 4090 
150 FOR ft ■ 1 TO nuu* 

152 IF ft■! THEM LET u 

155 IF n*l9 OR ft aSO^ 

OR n =£0*4 OP n=20*5 OR 

P n®£047 OR ft *30*0 OR 

mSOtlS TH EH CL% GO 
let y«3 IF onntiril 

156 LET V m*M *i 

160 LET l *6 INPUT If. L refute C 
4 Ch i EDO HHI f , " ^ "j* 

iE 4 if i ■ j i them go to 100 

166 IF 4 15 THEN GO TO 160 

167 PRINT ^ l^.a-LCN 5TE?| M 

, BRIGHT 1, 1 , " ■" , AT V.t+tA-LEN 5 
TRi # i BRIGHT 1 , € 

170 INPUT "tQ4%9&* \C3di9 IF 
'I THEN 00 TO 170 
17E PRINT AT ^.7 + L2-LEN STRf CO 

dii". bright iitBdt? 

lie INPUT ’OCBE o MftBEft^ id/HJ 
“.. LINE df IF LEM dl l THEN G 
0 TO ISO 

L90 IF a*E d" Then let t »10 L£ 
T s -1 GO TO £10 „ „ 

iOB 3 F dli'h ’ 1 THEN LET 1*17 GO 
TO £10 

SOS GO TO 160 

310 INPUT "Cm t .Gift! IF 

q*ft l j 993399 THIEW GO TO 210 
323 PRINT AT y .l4 f 6 -LEM 5TR * C* 
AU. ORIGHT l,£*ftt 
330 IF iml THEN LET SaL^OaiALdO 
-Gift l LET Cint*-Cini GO TO £50 
340 LET litJOsSndOttmt 


Con este program a 
tendremos all dia 
to das las mwimientos 
e<ondmi<os de la casa 
y podremos saber 
EXACTAMENTE, en que 
se nos to el dinero. 

Rani; comcti/iir, y despues dc pulsar 
una led a. d ordenador nos pregun tam 
d sal do del mes anterior, si lo hubicra. 
si no, pulsaremos ecro. 

Nos preguntara, igualmcntc, los daios 
que vamos a imroducir. y ima vez dados, 
pulsaremos ENTER. Otra informacion 
a pedir sera el numero dc eddigos que 
cvisien. Aqiii debemos tencr en cucuta 
que, por razoncs dc cspacio en pantaila, 
palabras laics como elcciriddad o gas. 
por cjempla no esiau iiidtiktas en el pro- 
grama. Dcbcmos ser nosotros quicncs de* 
rmamos una labia dc eddigos, (por ejem- 
pin, electricidad:I; gas:2), Una vc/ hccho 
csui. imroducimos la camidad o nume¬ 
re dc cckligo que nos ha salido, siempre 
que no CXccda dc quince, 

Et paso sjguicnie sera rcllcnar la [ub I a 
del niovimiento, para lo que el ordena- 
dor nos fx'dira la fccha ((eclcamos cl mi 
mcro del dia del mov imicnio, pulsamos 
ENTER y nos apareccni cl signo " \ 
dc nuevo cl cursor, lecleamos cl numero 
del mes y otra vc/ ENTER! 

A continuacidn, nos pidc el cdtligo. 
que tcdcarcmos para imprimirsc cn pali¬ 
lalia, 1 uego nos pidc si Ea camidad es c\ 
Iraida f"d" dc debe) o inirodueida ("h'" 
dc liahcr). Einalmcntc. cl ordenador nos 
pidc la camidad y ya se cncarga cl dc im- 
primir tanto l;t camidad como d saldo 
anterior, 

Una \c/ aqui, cl ordenador nos ordc- 
na que pulscmos «EN 11 R»> y elijatnos 
cut re ins opciones: pulsar ENTER, con 
lo que pasamos a imroducir cl sigutetite 
movimientft quedando fijados los daios 
que acabamos dc imroducir; pulsar «cc» 
seguido dc «ENTER», que cs la opcion 
dc paro o Enalizaddn. 


Premindo (on 15,000 pts. 


;bo let t in , fod. ji . . _ 
aea print pt ».sf • «e-LCM sip* » 

4 L 40 h r BRIGHT l r S9UD 

a?S Input e PuUi "“CNfrCR"' a 

f LINE hi IF LCN htt -9 ANG L 
EN b|o^ £*t*0 LEW hi -3 THEN GO 7 

0 £?S 

£74 IF h|i "tr THEN LET 

*idO-c*r i let c to pri 

NT 0UER 0,ftT U.l, BRIGHT 1 PPPE 
ft 6. , At y.7 r BRIGHT % t Pfl 

PER B t " i AT y- 10, BRIGHT 1; PR 

Ptft 6.- ' ,fiT V ,17, BRIGHT I 

Pflfttft ft, " r RT BRIG 

HT 1, PAPER 6, ^ GO T0 I 

6C 

£7ft IF Ei*-ppp" THEN l£T ft ■nylld 
4 tOS 

260 NEXT n IK pr iftt* r■ 1 THfN C 

290 FOR n*l TO 4 FOR ml TO nu 
ld*US LET 4 <hl ■* Lft I *t £P <fi > ME 
MT ra NEXT ft LET dtMli HildC 
300 INPUT ■FiftAl. P4r# it|VlY 
■ ENTER"" . ", LINE r* # 

3i b Sop dcr i paper e cls pl 

OT 1,1 tipfiu 353,0 ORfiU 0 173 

DRflU -353,0 C-RfiU 
320 Over i print Bvcfto I 

A t 4 b l A d( virnbit* M J C i \ * 

Hi 14 P*fA H<* 9 f ibiS*. Am* 

1 dt h*£t fUi qtlitrt? t**~ liii 
^ yft Li! UdO d€ CflipfOb*- £ 4 
4€ iptJOi lOi Ctdt90J y ini S&-T 
£ 4 f ■ C f J 1 (ft l £ I T □ 1 4 l * i "" " Puls* 

O r t, fi. * ” 

300 IF IMKEV f < "I" BNO iMKGVf 

-ft then go to 330 
340 IF SNKBYIe 'I" then go sub 3 
000 

345 CL5 PLOT 1,1 tfifiu 353 O 
ORAU 0,173 DRAW -253,0 tRAM 9 

WlWT M F#5* dt Ci&n 

4 ££. ft T. i fty4 C i C-ft L4 

L -A qyt f ■i* 

v«ri4bL4t rtdi ft 


PRINT 

■. iftUOdUCC 

tnqy«u c o ft 

4 l Ai l 

I 'YOdUfliil- 
3ft0 PRINT 
t I HI id ftP 

1 10 

370 PAUSE 30 

LINC € f I F 


THEN GO 

5aa print 
u to H 
390 PRIll T 

N BE 

4 00 SAVE ** 

4 3.0 PRINT 
ft! y HJLS1 
L f it A ' ■ " 

4£0 PAUSE 0 

7,|," 

10. ii 


Rttutrdi tit* 

dtfc* lotrfpisi^ 

It f* 1 * ■ 

input e n Rut t« 

- 4* >10 OR LEW 


TO 370 

Dt A Cut r. 

ai I-* iy g * "■ "" ■ 1 " 

« ' JIB GERE AC 10 


DATA d <l 

Sieft ■ Ih&r1 r« bC bi 
Mfti it c t i tin tf 

OUER O PRINT fiT 1 


QUEft 1 PRINT HT 1 


► 
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SOFTWARE 


lamentamos el desconcierto que entre los usuarios de Sinclair haya oca- 
sionado el Aviso aparecido en el N.° 7 de esta Revista, acerca de los pro- 
gramas supuestamente «piratas», realizado por una Empresa de Software. 
IVESON, apoya y se une a cualquier iniciativa que critique acciones des- 
leales o ilicitas y recrimina a aquelfos desaprensivos que ilegalmente «pi* 
ratean» programas, ofreciendolos al mercado en condiciones anomalas y 
a precios muy por debajo de lo que la libre competencia ad mite. 

No obstante, estamos en total desacuerdo en lo referente a calificar de 
prog ra mas »piratas» a a quell os que por una mejor gestion comercial se 
ofrecen al usuario a precios mas asequibles. 

Afortunadamente, en este pais existe libre mercado y la competencia es 
perfectamente licita. 

En IVESON software, nos dedtcamos a la venta de programas —por su* 
puesto originales— y no a la venta de estuches mas o menos sofistica- 
dos. 

Por el gran respeto que nos merecen los usuarios de Sinclair, nos esforza- 
mos dra a dia para ofrecer los mejores programas al mejor precio relacion 
calidad y aceptamos de buen grado la competencia. 


NO TE FIES DE LAS APARIENCIAS! 
iCONTRASTA LOS PRECIOS! 


IVESON software * Riera de Tena, 15, Tda. 4 (Pj&) junto estacion Mercat Nou. 

Tell.: 249 31 96 - 05014 BARCELONA 



PROGRAM AS DE LECTORES 


7,0, * BB VERIFICRN&O US 

UtftlFV ft DflTR d O 
4J© PRINT AT 20,©. Tod& corrtt 
to. Fir> dt progrui/' 

2999 3TqP MOP 

3 ®0® BORDER 1 PAPER 5 CL* PR 
INT fir 0 o, xnueR 3C i, a 
COfiPRQe ACTON TOTALES S ’ PRINT 
BIT 2 r 1 . ’00D3C0 OEBE 

HABER" PRINT 

5005 PLOT L r 1 DRRU 233.0 DPAu 

a. i5d orhu - 233 ,p drau a , - les 

0007 INPUT flT 0,0,"Q ucf^JJ (CP^i 
Liprtw at comp robi £ i oo? 

is /m " ■ LINE Ft IF P|< | - 

AND p t U n THEN &5 TO 30®? 

leos if Pti i" then let prtnttri 

fi 

301® 0U£ft 1 FOR 6-1 TO 4 PRINT 


*Ut 


n * , fi , 

4l®=14* 
«® THEM LET 


LET 

q-ll 


q+ (7-LEN 5TP*. d in 
-OT 0* V I®-t81 


TAB 2+12-LEH 
3020 LET 
*20^154 IF 4 11 
LET *2® .6-0 

3030 PRINT TA8 
i I . AOS d ffi t FLt 

C RAU &fi*M5~LfN STKl fl&J d (0 » > * 

3 n . 0 

304 0 NEXT r PRINT PRINT OVER 
1.TP& l # l 2-L E N £TR* 4*1' • ii * 1. TAB 
22+L7-LEN 5TPi 1 a LdO 1 , t A LdO PL 
OT 34 ^10-iM +3; *3 ' DgfiU 154 i ' ' 

6 -LEN §TPt d 14 tin 4*> ,0 

J045 IF pnolcra-l THEN COPY 

3O90 input Fm*t eotatrobtcioft . 

■ ENTER . " LINE It RETURN 
4®04 

4 000 

40M REH CRCACION PRUTALL* 


409 1 
4092 
4095 
CL5 
5000 
*1.0 
RAU ® 
50 1® 
5020 
30 30 
70.0 
RAW 0 
? 

5040 

3004 

E» 4, 

A6ER 

3070 


BRIGHT 1 PAPER * BORDER C 
BRIGHT 0 
PLOT 0 0 DfcAU 0,171 ORAU 
PLOT 194 171 ORAL 61.0 £ 

, - 170 

PLOT 0,105 C-RAU 253,0 
Pi_OT 0 14? DRAW 253.0 

PLOT 5i,® ORAL 0 14* PLOT 

CPAU ®.147 PLOT 132,0 D 
14- FLOT 103,® DAAU 0,1* 

PRINT AT &,S. OUEP 1, B»IOH 
PAPER & r "TAOLfi MOUlHlCNTO-- 
PAINT ftf 2.1, BRIGHT 1 PAP 
OVER 1.“FtCHA CD DEBE H 
&ALOO" 

RETURN 


CARRERA DE VALLAS 


Premia do con 15.000 fits. 


Adolfo ESPINAR 



Como ayfenticos atletas, 
(fescubriremos ion este 
programa, to pas ion de la 
(ompetidon en la que nuestra 
gnica meta sard la de superar, 
lo mejor posible, las pruebas 
«j ires pond Jerries. 

Asi puts tenemos quc cnlrciHumos a 
an largo rccomdo salpicado dc vallas que 
deberemos sal tar con el mcnor numero 
de faltas posible, Para ello, podcmos 
pulsar cualquicr leda y poncmos en mo 
vimiemo, y pulsar «0»> para saltar los 
obsidculos. 

Como daio a dcsiacar, rccakar quc la 
oiarta rutina va en cddigo maquina pa¬ 
ra L'onscguir d scroll del primer terdo dc 
pamalla. 



N0TR5 CRAFICP6 

1J£? 

^ i r ,i je * ^ 

Q p 1 


n *. a 



i mmn 

4- ORTA 0.54,1 


54024 


94 

e n 4 *■ NEXT n 

*■ ypi i r 1 u j r i 7,0 ^ 04 . 2-13 j 223,3 

5 , 197 , 1 , 31 , 4 , 2 *, 2 ^ 7 , 17 *. 43 , 119 . 0 L. 
. 53,33,10.i03 ,10,240,201 

5 REh -------*-*•*•■mmmmmmmmm 

6 DIM if IS. 10 3 LET ItfiliTlA 
5 H 0 50 Y' r LCf $il53*’ J URLE TIOM 

LET i ■I II-"YUUPII, .I !" LET $ 
t 121-"VICTORIA' LET i f I 3i* ‘LO 

LOOM 1 1 ' 

10 6AICHT 0 BORDER 0 PAPER 3 

CL5 

J i PRINT PAPER In.ifMMiM 
PRINT PAPER &, . *, , ,. j. p , , # * , . , r B . 

RR t NT PAPER 5. L h,, f - 
IS CIRCLE 73 , 110,56 CIRCLE ^12 
O.l 10. DP CIRCLE 155,110,30 CIR 
CLE 100,701,3® C1RCL A 1*0.70,30 

13 CIRCLE r3,na,?fi CIRCLE 12 
0.110.25 CIRCLE 103,110,25 CIR 
CLE 100 r 70 , 20 CIRCLE 140,70,2* 

14 PRINT AT 19.5. efil&Nt 1. PA 
PEP 5, INK 2,"E L C OR REDO 

R-.RT 21 . 3 , SOFT WARE © A.EiPiPii 
r 1^54" ^AU5E 0 

20 PAPER 3 CL 5 BRIGHT 1 CL 
3 BRIGHT 1 

21 PRINT AT 1 , 10 . INK 9 * PiY 4 

ulnar puite 0 

22 PRINT PAPER 3 .. 



^,4B INK 7 ORAL 253. 
0 PLOT 0,5* DRRU 253,0 PLOT 0 
,31 DRAU 255,0 

23 PLOT 0.34 ORAU INK 7^233.0 
PLOT O.20 DPRU INK 7.235.0 
26 PLO^ ®.® DRRU 233.0 
30 DATA 0,0,1,3,3,®,0,131,0,14 
I*.14,24®. 112,240,& C 3, 199,231.1 
*2. 0,0, his 135, *6,93.1 

92.12B>22* 

32 ORTA 0.0,12.4.3,0.64,99.0,1 
4.14, 14,240, il3 r iS4 , iM, 113,91.3 
0^14 r 0,0.0,6,324,96.45.44,12.6.6 

34 DATA 0.0,0,®.l,i.4,1,0,14.1 
4.14,240,112,224,224,3,3,3,3.3.1 
5.7,3,2*5,12*.I®4.192.12*.&, A .19 

30 ORTA 0.0,12,4.3.0,04,99,0.1 
* . 14,14^240.113.234,192.113.91.3 
®. 1*,0.®.0.O.240,24 3.13.7.3,0.®. 

0 3S OATH 7,37.33,33,33,33,1,1 

39 DATA 0.0.0.0,120,4.2,235 

40 DAT A 131,45.203.96,155.55,4 
5,203 

5® FOR TO 151 READ 9 ROK 

E USR itw.q NEXT v 
5 ® LET 0 1 ■ ’* F|" LET Ci 

P0 

55 LET p*»" 



® p p|, nr 4 e u* 

”- -- h « <3,2> 

LE+ it 
LET q 

LET J 

LET R -0 LET i -0 LET h 
ENT AT 5 . 0 . PAP 

1 +* + «*-*«*# + + 4 + 

14© PRINT AT 17,0, INK 

r is,e; f " pauAe 0 bee^ 

© * PRINT AT 17 , &; “ \AT 10.5, M 


100 DIM 3«^3 ± an &IH 1 1 E 3 , 2 ) ; L 
ET A -0 LET l*tll « Rl ^ 44 LET *112 

1 ■" V" LET LET qitl 

LET LET q §?3 

i - L et n-e let j-o let h« 

121 PRINT AT 0 . 0 . PAPER 4 .,*. 
130 REH 


190 LET tit 11 LET n«n11 IF Di 
-4 THEN LET nm l 
193 LET £ m mUSR 64000 
200 IF INKEYf < > l, 0 ,J AND THEN 

PRINT AT 17,5, INK 0. t4 in) . AT 1 


3.0* INK 6.9tvnj IF ft(il THEN * 
EEP .002,20 

210 IF 1NKEY9■"8" AND m>12 AN 

3 c *7i then Seep ,o*.i let i*t 

+1 LET j -1 

220 IF j-1 THEN LETT h™h+l 
230 IF ht2 AND A *1 THEN PRINT R 
T 16.0, " , AT 17.8, AT 16.5 

, INK &,. L'jfi .RT 17, B, INK 6, ‘ 

235 IF h > 2 TsiEN LET h-0 LET j« 
3 PRINT AT 17.B, " i AT 16,5,* 

240 LET f-INT iRND*2)*l IF r-2 
THEN LET A*1 

25C IF 4-1 THEN LET C*C-2 PAIN 
T AT 13, t ,014' ■" IF C ■© THEN P 

PINT AT IS . £ . " B ‘ LET C »30 LET 

of- j n M 

260 IF j-0 And C*S THEN PRINT A 
T lg-e;"a">flT 17,0, INK A 

r 15.5 INK 6 ; QUe6 1. LE+ 

BE-EF .05,10 LET fuf+I 
PR1NT AT 21,10. INK 2, PAPER 7. 
INUEASE I. flLlli "if- FCft 1-1 
TO 20 NEXT * PRINT AT 10,5," ’ fc 

JU P J?£ 0 ,IE EN T0 **» 

300 GO TO 190 

500 PRINT AT 21,27, INK 7 r * t R 
T 13,19, -t PL0f 8^4, <S IMR 7* 
DRAU -64.6® 

502 LET na® FOR d -3 TO 27 
^505 LET fi -n * 1 IF n *3 THEti LET 

INK ©, J “ + |ti 

ffil^HT 15 , * INK 5," *qilR3 EE 

EP + 1.-2® 

320 NBXT d 

330 FOP h*l TO 20 0EEP ,«,h 
NEXT n PRINT AT 2,0, INK 0, PAP 
Efl ?; FLB3M 1," MR LUE&flOO 

A LA HETA 

633 PRINT RT 4.0, Ink 9 t PAPER 
4. Y 5U ALEORIP ES INCONTENIBL 

B4d let no-rrrr irnd« 5> *i let n 
■0- FOP j,*l TO 20 

545 LET flaft + 1 

346 IF *>=± THEN LET rt -1 

347 PRINT INK 0 S RARER 7 , FLASH 
% BPIGHT I, AT 14.2 0, $ t I fi I» 

330 PRINT AT 16.23,” INK O 

PP I NTT AT 1 ? 26 • ^ * i n I, Bit 10 . . 

INI* e q«irti BEEP .3. rut 

‘?55 PRINT AT iB.SS, '* " IHI* 0 

PBIHT RT lt.JS i»fnl,«T 17.J8. 
INK £ u mi BEEP . 3 , j 

56© NEXT j 
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PROGRAM AS DE LECTORES 


SKI ACUATICO 


Jose Vives Montero 



Premiftdo <on 15*000 pts. 


NOTflS GRAFICflS 


P B C 



A pesar de la epo«ct que wife, sepum que a muchos de 
nuestros lertores les gustaria sentir la brisa de la 
costa, mientras disfruta del ague y el sol en un 
apaiible pnseo acudtiio. 


I-m;i ck cn smicsis. la trama de cstc 
mievo juejio que presen tamos a cominua 
cion, cn cl que. ima vc/ mas, tendiernos 
quo demosirar iwcstra hahilidad, lift es- 
la ocas ion, con skis induidos. 

Sit uemonos eerea dc una costa eual- 
quiera, dondc d is fru tamos practicando 


nucstro deporte favoriio, mientras in ten- 
tamos csquivar lodes I os obsidculos que 
sc inter ponen en nuestro cantina 
Para hacejflo y eOilcluir con 6rilo d re- 
corrida, con tamos con dos mandos. I y 
0* Suerte, 


IB PpHOOhlie 0 GO TO eooe 
1G0 OUT as 4 . "7 OUT S54 20 

lie lpt o*p « i 

130 PRINT AT 0,35,0' 

»e if c-/i0oo*iNT . o . ioeo ■ 

GO SOS 3000 
lie plot outfi i,igtfli; *-trail 

oue» i, i.i^*e( tc: 

ISO POKE £320040 ,9 
190 LET |1«.ftHReVta"f 
i * i INKE'-'*-"* BNO 0 , £9» 

300 POKE 33300 4 > ST 
310 PLOT i9*SJ *4 , fi 
f S* . 103 

220 IF THEN CC TO iOO 

230 IF i 1 7 THEN PwlHT AT- : 

aper i. 

2*6 LET I «i i i LET J a J - i *. s 
250 IP L ,7 TKCfj PRINT AT 1 . . 

■ - >H pi 

M* ; > >30 then GO SUB 1003 
29B IE tin 1 Tt*CN GC TO IC3 

30O IF i ,? TH£H PRINT AT * 

APER H hl 


THEN 


RN& 9 2 


ORfiU i 124i - 


flPEB 

200 


. I; P 


LET 1-1*1 LET * * f, yl0 

IF i 7 THEN 1 PRINT AT i,i. P 

I* .'-.30 then go SOS 1050 
GO to 100 

IF 9 J THEN GO SUB 3000 
PBINT AT 30, „ PAPER 1," " 
LET i »INT i fiNt> * “ 7 1 LET j *1 

LET K.ilMT i RNO*2» 

RET l/RN 

if mjk then oo sue 2000 

PRINT flT 20 , FfiPEB I r “ 11 
LET i -INT iRNDe-7* LET h «= 1 

■ 

10^0 LET K.IHT I BNP#21 
RETURN 

2000 BEEP .2/3 BEEP ,25,5 BEEP 
.1.4- L£* ■ -*/l 

2010 PRINT PT 0,12,8s 
2020 I* *-3 THEN FOR n*l TO t** 
□UT 254,7 OUT 254,23 OUT 254. 
57 OUT 254,110 N£«T n 00 TO S 
000 

2100 RETURN 


310 
320 
APEC 
330 
099 
10 10 
1015 
1020 
2 

1030 

1040 

1050 

1055 

1060 


3000 RANCOMtlE U5R 31492 
3005 CO 5UB 4000 
301O LET 1-1*1 
3020 LET f s f +2 

30 30 PRINT BO. TAB M, 

3040 IF 1-5 THEN GO TO 3500 

;:0O return 

3500 PRINT ST 4,12, FlASH 1,. INK 

0. BRIGHT 1,” CAHPEON " 

3510 PRINT AT 2.12. FLASH 1,11*0 

PRINT AT 6,12, FLASH 1, 

3550 GO TO 3550 
4000 PESTQR5 9500 
4010 FOP n-p TO 7 
4020 PEAI- A 1 

im eiirn flT n ' e - iNK * #| 

4050 LET p-a+1 

4 050 PRINT RT 7,15; PAPER 5/"i h 
4070 RETURN 

5000 CLS IF Oih* THEN LET h * -0 
SOLO PRINT AT 10,3,"HAS PCCOftRIO 
O HETROS L - f RT 

BEcfaRbita "chi/- Hernia 1, 

5020 print At ii.ar-juoHHoa otra 

PART I OR (l/R)" 

5O30 IF TNKEV*- . THEN GO TO 503 

O 

5O4 0 IF ItiKgYll >*1* THEN ARNOOHl 

IE USR O 

5050 CO TO 7000 

6000 FOR n -144 TO 146 

cole raft I.? to 7 

6020 READ o 

6030 POKE (U5R CHR* n} *m 

tO40 NEXT m NEKT O 

6050 ORTA O.O.3.3. 1 .59.29, 14 

6060 ORTA O .O.125,125. O 104 ,112, 

224 

6070 ORTA 5,20.34,127,0,66,931,2 

31 

6100 LET h|>D 

5190 FOP A*31492 TO 31512 

6200 READ * POKE n # 1 

6215 NEXT n 

6220 DATA 6,255>197,62,0,6,205,2 
U.54,545,241 if - 25^ ,01,5^.245,1 
93,16.239,201,20i 

7000 00R0CR 6 PAPER 1 INK 7: C 
LS 

7010 LET 4H 1 ’ 

7020 FOR A-0 TO 7 

7330 PRINT AT n,0, PAPER 5.# I 

"040 NEKT A 

7050 FOR i**S TO fll ^ , B „ ■ 

"*060 PRINT RT ft-0. PAPER 2 r INK 

6. FLASH lj M ", RT A j 3 1 « *■■ 

7070 NEXT 6 

-090 PRINT AT 0,16; PAPER 5, INK 
7. H HETRO5-0" 

^100 PRINT AT 0,5, PAPER 5. INK. 

7. FALTA 5-9 

■ilfi PRINT AT 4,0, PAPER 5, INK 
PRINT AT 5,0. PAPER 5 r INK 
PRINT AT 6.0. PAPER 5; INK 
INT AT 7,0, PAPER 5, INK 



0 PRINT BT 7 * ISPPPER 3, A 
-- -- - CIRCLE 230,1 


7160 FOP n-0 TO 4 
5,n NEXT n 
-5030 LET Mg let f -13 
9040 i_ET g-15 LET h « INT 4PN&+21 
6850 LET I -6 LET j-15 LET Pi * 15 
5060 BEEP * 3,-4 PEER . 25.-6 PA 
3NT B0: m NIUEL 1 1-4 J ■" , 

6070 LET \*= Iti/Eri 
3000 3F 4= THEN GO TJ 
50P0 IF If -l-- OR If 4 ThE% GO 
TO B07O 

SIO0 LET 1-UAL Lf 
3110 PRIrJT B0.TA6 f *l, 

6120 LET 

9130 LET &iC LE T p *5 

SiSS^kEI.II ■ 

ir"« T 21,1, PAPER Ij INK 

1 t A 

950D ORTA 
9510 ORTA 
9520 OAT, 

9530 OAT 


3596 INK 7 PAPER 5 

2999 GO TO 100 
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UNA PUBLIC AC ION DE 


HOBBY 

dgj: PRESS, S,A. 


Una revista que todos los 
meses le informara de las 
principals competi- 
ciones nacionales e 
internacionaJes, 
novedades del 
mercado, prue- 
bas de produc¬ 
es comerciales. 
pianos para que 
Vd, construya sus 
propios modelos, 
novedades del mer¬ 
cado, pruebas de 
productos comercia¬ 
les, asi como una se- 
rie de articulos tecnicos 
escritos por los mejores 
especialistas. 


revista de radio control y modelismo 

































HARDWARE 


V 


EL CONECWR 
POSTERIOR DEL SPECTRUM 

Primitivo de FRANCISCO 

Queremos con este otpitulo, a modo de predmbulo, que 

S ueden dares Jo situation de cado una de las solidas 
el cone<tar posterior, aii coma su fitncionaltdad. De 
este modo, nosotres estoremos mas seguros de que los 
cinwitos le funcionardn a la primera sin mayor 
inversion de costo y de tiempa y, par supuesto, sin 
danar al Spectrum, le logamos mantengo proximo este 
artiailo como auxiliar de los montajes que yo se 
avednait. 


Eh la pane posterior cxistc, como sin 
dudii Vd, ya conocera, nn corrector alar- 
gado que cs, en si, una simple prolonga¬ 
tion del circuilo imprest) que condone al 
micropnxesador, memoria y demas apa- 
ramcilia logica. 

El collector es del grosor de la tarjeta 
de libra de vidrio, v dispone de doble ea¬ 
rn eon 28 terminates dorados por cada 
cam. l.a eara superior se denomina CA¬ 
RA «A» coincidfcndo cm a con la cam del 


CARA eoincidenie con la cara de 
pisias del circuito imprest). En csta cara 
no se halla ningim components La mi- 
meraclon va de derecha a izquierda, vis¬ 
ta por el lateral posterior del aparato, DE 
cha mimcracidn va del I al 28, por tan 
to, la cara «A» se numcra entre el IA y 
el 28A y la cara «B» enire el IB y el 28B 
F.n cl punto del concctor numcro cin- 
co. eviste una hendidura cn el circuilo im¬ 
prest) que ocupa la tola I i dad dc los con 


tact os 5A y SB, A csta muesca o hendi¬ 
dura se le denomina con el nombre in¬ 
gles de SLOT, nombre que enconErard 
con frecuencia cn muebas de las publi¬ 
cations que exmen sobre cl Spectrum, 
La muesca sirve para indicar la position 
del concctor heinbra e impedir que ve to- 
necte git ado ISPgrados; para ello. ha dc 
esistir en el collector hembra un diminu- 
to labique de plastico alojado en el tcr- 
minal numero 5 y que se insenara en la 
hendidura del collector del Spectrum cn 
cl momento de la concxion. 

Atencion 

Queremos resaltar que nunca se interne 
enchufar concctor alguno por la parte 
posterior teniendo el Spectrum alimen- 
tado, esto llevaria cn un amplio margen 
dc probabilidades, a la destruction ine¬ 
xorable del Spectrum, La razon de este 
consejo es quo debido a que en el concc¬ 
tor posterior cun flu yen diversas tensio- 
nes (GND, +5, —5. 12V y 9V), tal co¬ 
mo se mucstra en los dibujos. Una pe- 
quefta desviacidn titubeantc o giro del 
concctor podria dar lugar a que se cor- 
tocircunaran pistas de las tensiones elec 
tricas mencionadas con pistas de seba- 
les vecinas, For ejemplo, si se desplazase 
un poco hacia la derccha en el nuimemo 



COMECTOR CARA A 
(CARA OE COMRONEMTCS) 


circuito imprest) en que van colocados ft 
sicameme la totalidad de los 
componen tes clcciro- 
nicos. La cara 
inferior cs la 


Detalle de la denominaciAn de cade uno de los 
terminates en el toneefor posterior del Spectrum. 


SECCfON DE LA TARJ£TA 
DE CIRCUITO IMPRE50 


CWECTW CARA ft 
(CARA DE PISTAS) 


SLOT 

HENDIDURA INDICE 
EN EL CIRCUITO iMPRESO 


teruinales 

ELECTRiCOS 

DELCOMECTOR 
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dc la inscrcidn, podria dar lugar a que 
la pista numcro 22A quc Neva 12V inycc- 
taru los rnkmos en cl terminal WAIT del 
microprocesad0r. conllcvando esto su in- 
mediata dest i uccibn. 

En los dibujos qtic acompaftan a cstc 
aniculo mostramos la distribution dc sc 
ilalcs en el collector visto por la parte 
posterior del Spectrum y la agrupacibn 
functonal de tod os sux terminales. Exis- 
ten uni came me cuairo terminales que no 
sc usan: 

Dos ocupados por la hendidura \ 
otros dos denominados NC‘ (No cornice- 
lion) no oonectados. 

De sc ripe ion de los terminales 

l os 56 terminales del collector tierien, 
cn su mayoria, cometidos espedfkos quc 
tratamos a conti nuacibn agrupados fun- 
cionalnicntc. Vet figura numcro 2 en 
donde sc mucstra su correspondencia nu¬ 
merical 

— A0a A15: Estos dieeiscU term ma¬ 
les son las salt das direct as del bus 
dc dircccioncs del microprocesador 
sin amplification interna alcana, 
por lo que tin cortoeirciiuo cm re 
cl las o alter acton dc su imped an 
eia daria iugar a que el programs 
en curso sc perdicra. 

— [50 A D7: Esios ocho terminales 
se corrcsponden eon los ocho biis 
del bus de direceiones quc tambien 
proeeden directamentc del micro- 
proeesador, cstc bus permite el flu- 
jo dc dales cn los dos sent idos, 
Tampoeo sc cncuentra amplifiea- 
do, por lo quc licnc las mismas ea- 
racterisi icas quc el bus de direccio 
ncs. 

— RD: Serial de perm iso de lectura, 
La rayita superior indica quc cs ac¬ 
tive cuando esta a eero l6gico. 

— WR ; Serial dc permiso dc escrit ura, 

— MI: Esla serial cs normalmcntc dc 
poca utilklad. En esencia indica, 
hacicndosc eero, cuando el mtcro- 
procesador cm a t rata n do el byte de 
codigo dc toda instruction, 

— RFSH: Serial para cl rcfresco del 
htoque dc 16 K bytes de RAM DI- 
NAM ICA. 

— IORQ: Seflal que activa los depo¬ 
sit ivos exicriones t rat ados por pucr- 
tos, 

— MREQ: Sch a I para el acceso a me- 
moria. 

— JORQCiE: Sefial de acceso a la 
ULA. Tratada como puerto. 

— 1NT: Entrada dc activacibn de las 
imerrupeiones enmascarables. 


Eniradas y salidas del Spectrum sogim su 
cometid® funcin&l- 


— NMi: Entrada para la activation 
desde el exterior de las inicmipcto¬ 
nes no enmascarables. 

— ROMCS: Entrada para el bloqueo 
de la ROM de 16 K en donde resi¬ 
due! BASIC, 

— RESET: Entrada desde el exterior 
para el borrado c initial i/adbn del 
microprocesador (csta cm rad a fuc 
usada en un articulo dodicado al 
reset en el numcro uno dc MICRO 
IIOHUY). 

— BUSRF.Q: Entrada para solicitar 
desde cl exterior la entrada a los 
buses del si sterna, bloquedndosc el 
microproeesador (Sirvc para com- 
partir memoria por dos o mas mi- 
croproces ado res), 

— BUSACK: Salida por la que el 
Z-80 indica al dispositivo exterior 
quc solicito los buses, quc ha par- 
tir de este momento los ticne dis- 
ponibl es. 

- WAIT: Entrada para detener o re- 
lardar la action del microproeesa- 
dor. 

— U: Salida de video con la seilal de 
color B-Y (Blue - Yellow), 

— V: Salida de video con la seftal de 
color RY (Red - Yellow). 

— Y: Salida de siucrorvismos de la se¬ 
rial dc video. 


— VIDEO: Salida dc video con la su- 
ma de color, luminancia y sincro- 
n ism os. 

— CLK: Salida del dock o rcloj dd 
sistema (3,5 Mhz.). 

— GND: Masa del cquipo, 

— + 5V: Salida dc 5V para alimemar 
circuitos cx ter lores, 

— — 5V: Salida dc —5V, cs de cscasa 
poicncia. 

— +12V: Salida dc 12V, cs tambien 
de cscasa potent ia. 

— +9V: Salida dirccta dc 9V desde el 
collector i/quierdo del Spectrum 
(9V D.C.). 

— + 12V: Un (Unsmooihcd} salida no 
concctada dc 12V proccdcntc del 
convcriidnr imerno. 

_ En re sumen_ 

Es el conecior posterior una vcntana 
para la extension ilimiiadu de su Spec¬ 
trum, A estc collector van adosados los 
distintos peri feri cos que se encucntran en 
el mcrcado y los que aparccerbn, Ha de 
tener con el sumo cuidado y no abusar 
de la concxion y dexconexion sistemaii- 
ca do los dispositivos extcriorcs de que 
ya disponga; porque esto acarrea un des- 
gastc y deterioro gradual dc sus comae- 
los, 

lampoco es aeon sej able la cones ion 
apilada de perifericos que aumentarian 
desniesuradamente la carga en los buses. 
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CONSWMtO 


Prerias de programas 

Los precios que vienen 
puestos en las programas 
de la seccidn de los Mejores 
i&on de alguna tienda o es- 
tablecimlento en especial?; 
y si es asf jjCuAI es? 

M. Angti HEMS - Mtdnd 

i en la cabecera de cada 
comentario de programa vie 
nan jmpresos todos los da¬ 
les de fete, El nombre es lo 
primero que aparece, un po 
co mbs aba jo vlenen dos 
a part ados diferenciados; en 
el primero, ftgura la eompa 
flfa que ha reaEizado el pro- 
grama y, a la derecha de fe¬ 
ta, tras una barra transver¬ 
sal, el nombre de la compa- 
rtia que lo comercializa, y 
que ademfe es la que nos 
ha proporcionado el progra¬ 
mme a nosostros, por tanto 
como es Idgico, el precio 
que figura al final es el que 
nos ha dado dlcha empress. 


Reset de dos doses 

Quiero adquirir un ordena- 
dor y como profane quisle- 
ra hacerles algunas pregun 
tas que les agradecen'a me 
fas contestaran lo mas pron¬ 
to posibte, 

1. En la instalacidn del re¬ 
set que publican en el n. e 
uno dicen que hay dos mo- 
delos, la versfdn 2 y la ver¬ 
sion 38. esta ultima debido 
a la abertura disipa mejor el 
calor ccOmo sabemos cual 
es la verisOn 3B?; j/cu&nto 
tiempo se puede tener co- 
nectado el Micro sin que el 
calor lo afecte? pues me ban 
comentado que el Spectrum 
se calienta muchoL 

Jvgt FEftNAHOEZ 

□ A simple vista, no es lb- 
oil observar cubl de tas dos 
versiones del Spectrum le 
han vendido. Par to que to 
mejor es abrirlo aflojando 
los cinco tornillos inferiores 
y leer el texto indicativo de 
la version en la parte inferior 
derecha de la tarjeta, inserf- 
to con letras blancas. El 


tiempo que se puede tener 
el Spectrum conectado es 
indefinido, y no por eHo se 
deteriorarb, siempre claro 
estb, que no se le tapen sus 
perforaciones de dlsipacibn. 
El calor que se nota at tocar 
la caja es debido. fundamen- 
talmente, al regulador de 
tensidn interno y a la ULA 

Un cassette pete todos 

Quiero saber si para apti- 
car el cassette al ordenador 
(o sea sacar un cable del or¬ 
denador al cassette) lleva ai- 
guna salida especial o por el 
contrario todo cassette pue¬ 
de servir. Voy a comprarme 
1 JOYSTICK y quiero saber 
si para ponArselo al SPEC¬ 
TRUM necesita otro aparato, 
Por favor, indfquenme el 
JOYSTICK mAs recomenda- 
ble y los distintos precios de 
los JOYSTICKS y de algun 
otro aparato que hiciera 
taita, 

Muchas gracias. 

Aurr DIEGO - B*fc+tonM 

[ 1 Cualquier cassette que 
disponga de entrada de ml- 
erbfono externo y salida pa¬ 
ra auricular sirve para ser 
usado con el Spectrum. Los 
Joystiks para ser conecta- 
dos al Spectrum necesltan 
una interface que se vende 
eonjuntamenta En cuanto a 
precios y modules de estos 
asf como los distintos peri- 
fbricos a usar con el Spec¬ 
trum encontrarb informacibn 
en la publicidad de Micro¬ 
hobby y en tiendas especia 
lizadas. 

Programar — BASIC 

Tengo un JOYSTICK de la 
marca SPECTRAVIDEO, que 
acopta al ZX con un interfa¬ 
ce ZX SPECTRUM. Ouisiera 
saber iquA instrucciones po- 
drta utilizer para programar 
en BASIC juegos que funcio- 
naran con el mismo (instru- 
ciones a afiadir en cualquier 
programa escrito en BASIC). 

Me he fijado que muchos 


programa BASIC utillzan en 
una misma linea de instruc¬ 
ciones vahos colores al des¬ 
cribe una frase. Ejempto: 

10 REM PROGRAMA(rojo) 
DE AYUDA(verde) AL U$UA- 
RlOfazul) 

20 PRINT "PARA(verde) INI■ 
CIAR EL PROGRAMA(rojo) 
PULSA(azul) LA TECLA J" 
(magenta) 

(Entre pardntesis se indi¬ 
can los colores que adquie- 
ren las palabras.) 

Mi pregunta es: iCOmo lo- 
gran hacerfo? 

Jnt* LOPEZ FEME Bucotont 

□ El interface 2 de Sinclair 
es ext re madam ente fbcil de 
utilizer, ya que el primer 
Joystick controls las teclas 
del 1 al 5 y el segundo las 
del € al <t>, Basta por lo tan 
to con escribir su programa 
como si fuera a utilizar estas 
teclas, 

En cuanto a las restantes 
preguntas esperamos que 
en el n.° 3 de la revlsta en- 
cuentre la informacibn que 
desea. 

PnUtmot de tododo 

Tengo un ZX Spectrum, y 
para mi uno de sus principa- 
les probtemas es su teclado; 
ya que sA escribir bien a mg- 
quina, mis preguntas son las 
siguientes: 

— iMerece la pena com- 
prarse un teclado. por ejem- 
pto *ei Teclado MuftifuciOn I, 
INDESCOMP»? 

— iSon sus teclas al fac¬ 
to tan buenas como las de 
otros ordenadores mayores? 

— £ Permits este teclado 
ia incorporacidn de otros in¬ 
terfaces? 

Jot* Ignacio JklOHSO • Lugo 

□ Si utiliza Vd. su Spec¬ 
trum para tratamiento de 
textos es, desde luego, im- 
prescindible afiadirie un te¬ 
clado de los Mamados «pro- 
fesionales». El de ENDES- 
COMP es de buena calldad, 
aunque no tiene un tacto 
comparable al de las mbqui- 


nas realmente profesionales, 
En cuanto a Eos periferi- 
cos, el teclado de INOES- 
COMP es perfectamenle 
compatible con todos. 

Microdrive 


En primer Sugar desea fe- 
ticitarles por su nueva revis¬ 
ta. Por otro lado he hecho el 
programa MlCROCOPt y es 
muy buena Este programs, 
aunque estA preparado para 
funcionar en cinta de cas¬ 
sette, yo, cambiando atgu- 
nas lineas del Basic, he io 
grado grabario en el Micro¬ 
drive: lo que no consigo es 
que lea y grade programas 
del Mic rod rive. Quisiera sa¬ 
ber si esto es posibte cam¬ 
biando algunas lineas del 
DATA y, si esto es asi. me 
diga cuAfes y por quA nu- 
meros, 

Jos* AGUILAR GONZALEZ 
Ati*M 

La ROM «enmascarada* 
del Interface 1, coniiene ru- 
tinas distintas a las emplea- 
das por la ROM normal pa¬ 
ra las operaciones de lectu* 
ra/eserdura. Por ello no es 
posible adapter MICROCOP I 
para microdrive, 

iklAflAHIWK 

I lUMiiiiuuvvi w pnnpwniua 

En la Cinta HORIZONTES 
sale una <ipresentacidn* 
cuando el cassette se estA 
cargando. Me gustaria saber 
edmo puedo hacer esta pre - 
sentacidn para mis progra¬ 
mas. Otra pregunta es: ipa- 
ra qud sirve el Cddigo Ma- 
quina? Gracias. 

JtfMn M*rtOS MASMtQUH ■ 6*I**r *i 

Lbgicamente, lo primero 
que tiene que hacer es gra- 
bar en cassette la pantalla 
de presentacibn con la or- 
den SAVE <ipantaila» 
SCREEN $. A continuacibn, 
necesita hacer un pequeflo 
programa que se encargue 
de la carga de la pantalla del 
programa principal. Para evi- 
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tar que el nombre del progra¬ 
ms se imprlma en la panta- 
lia. estropeando el efecto, fo- 
calice una zona de la misma 
sin dibujo y situe ahi la po- 
sicidn de imprestbn Un 
ejemplo, si la primers linea 
de la pantalla esta libre y es, 
pongamos por caso, de co¬ 
lor negro, el programs sen a 
como sigue: 

10: PAPER 0 ; INK 0 : 
BORDER 0: CLS 
20; LOAD ‘pantalla’’ 
SCREEN S 
30: PRINT AT 0; 0 
40: LOAD "programa" 

Ivitor errores 

Tengo un SPECTRUM I6K 
y tengo pensado comprarme 
uno de vuestros juegos pe¬ 
ro cuando voy a mirar las lis- 
tas veo que todos estdn en 
4SK y mi ordenador no pue¬ 
de tvncionar. Mi ofro proble¬ 
ms es que cuando cargo un 
programs me pone en la par¬ 
te inferior estas letras: R TA¬ 
PE LOADING ERROR y en- 
tonces, el ordenador deja de 
funcionar, 

Rcbuto rmeAnoez vumom 

: : Efeclivamente, los pro- 
gramas de 48 k no funtionan 
en el SPECTRUM de 16 K, 
pero con las navidades a la 
vuelta de la esquina es tlem- 
po de ir pensando en una 
ampliation de memoria. t,no 
le parece? En cuanto al pro¬ 
blems de la carga de progra- 


mas es, por desgratia, bas 
(ante clSsico. Una buena 
limpieza de las cabezas del 
magnetbfono, rebobinar las 
cintas tras su utilization y 
NUNCA dejarlas cerca del 
televisor, son unas buenas 
precauciones. Por lo dem^s 
lodo es cuestidn de ir pro- 
bando diferentes posiciones 
de tono y volumen hasta en- 
contrar la mas adecuada. Si 
es Vd un poco manitas tam- 
bien puede probar a regular 
la allura de la cabeza de gra- 
bacibn. Y por supuesto al 
grabar sus prog ram as no se 
olvide de desconectar la cla- 
vija EAR. 

Prog rumor en <odigo 
itwquina 

Poseo un ZX-SPECTRUM 
de 48 K. y tengo una duda 
que paso a exponer: 

Estoy confeccionando un 
ptograma para que me haga 
unos cAlculos concretes, y 
estos se basan en un precto: 
«X». medida: *$» y. una refe¬ 
renda; «&*’, y, tengo una can- 
tidad muy elevada para me¬ 
ter en memoria. entre otros 
calculos en el mismo pro- 
grama. 

Tengo una Referenda «&*, 
que sen a una cantidad alfa ■ 
numdrica que me soOcttarfa 
el programa/ordenador. y 
una vez tntroducida tendria 
que buScar en la memoria el 
precio que le corresponds 
«X». asi como una medida. 


*$», lo que en BASIC equi - 
vale a: 

If IN KEY $ = THE GO 

TO nnnn/GOSUB nnnn 

•fa ■+ 

THEN LET c = -X- AND 
f - 'T: RETURN/GO TO n 

rfifl-a 

La pregunta es: iCdrno 
puedo hacer lo mismo, en 
Cbdigo MAquina o cualquier 
otro lenguaje, para ahorrar al 
mdximo y que no sea tan te- 
dioso el programarlo? 

ft* GONZALEZ ■ Aircvton# 

□ No entendemos muy 
bien el sentido de su pre¬ 
gunta, pero vamos a intentar 
orientarle; 

— Si su problems es la 
cantidad de memoria dispo* 
nibfe, el truco no esta en el 
cbdigo maquina, sino en el 
empleo de variables o matri¬ 
ces alfanumdricas que con- 
sumen mucha menos me¬ 
moria que las numbricas, ya 
que estas ultimas gastan 
6 bytes adicionales: cinco 
para la coma llotante y uno 
para el CHR $ 14 indicative 
de nOmera, 

— En cuanto al p roblem a 
de tener que utilizar una lar¬ 
ge lista de inkey $ para 
capturar las diversas tec las, 
puede solucionarlo utilizan- 
do el valor ASCII de las mis- 
mas, For ejemplo, la utiliza- 
cidn de las teclas A . Z le 
permite direccionar fbcii- 


mente ei flujo de su progra¬ 
ms con muy pocas instruc- 
ciones: 

LET A = CODE INKEY $ 
GOSUB A (O GOSUB A* 
1001 

— Donde sf puede ser de 
gran utilidad el cbdigo ma¬ 
quina es en la busqueda de 
los valores de la tabla. Seria 
muy largo explicate un pro- 
grama com pie to, pero la 
idea general es cargar en el 
registro IX la direccibn de la 
tabla a investigar (no utilice 
el registro IY que se emplea 
para apuntar a ia direccibn 
de las variables del si sterna). 
Cargando los daios en el re 
gistre B (acumulador), 

Y en tea tidad tarn poco ne- 
cesita utilizar las parejas 
GOTQ/GOSU8 si utiliza una 
matriz como si fuera un ar¬ 
ch ivo index a do. Su ponga¬ 
mos una matriz altanumbri- 
ca DIM A $ (10,16) a la que 
Vd. quiere llamar pulsando 
las teclas 0 al 9. Los ocho 
primeros bytes de oada ele- 
mento contlenen ei valor AS- 
CIO del precio, y los ocho si- 
guientes. la medida (esto le 
da hasta 99.999,999). Una 
vez metidos los datos, su 
programs quedaria asi: 

10 IF (INKEY $ “9“ AND 
INKEY S 0) THEN GOTO 10 
20 LET INDICE = (CODE 
INKEY S) - 47 rCONVER- 
TIR A BINARIOV 
30 PRECIO - VAL A S 
(INDICE. 1 TO 8) 

30 MEDIDA = VAL A S 
(INDICE, 9 TO 16) 




ESPECIAL!STAS EN SINCLAIR 
SAQUELE RENTABILIDAD AL SPECTRUM 


PBQOFUMA5 EN MCRODRIVE Z? 


programas en cassettes 




EDUCATIVOS 


ContAfrlidttJ iPfiCj 

Cat (Htoj-a iHiK:tr6n4cA| 

FAC £u+« y C&hifQj irtrfKS 

P TECNIC05 

Aq tnlv Ov BoiSJ 

Lumburn en cabuhx* 


12 000 pfat 
bOOOplK 
6 &00 Oiit 
JOUlpljti 
a 500 ptas 


5 500 pf JS 
M 000 


GltOOra tift I 
Gty^rjPi.i || 

Cut&o ConiatHfiO^il I 
Curw de ConEatiilidad II 
Mar^TfSiiiita» y T^flenom*tn^i 

Supirfdflaarrollios 1 m 2 


HitifHiFne EMUeEoa con iirn^ftiorj ADM ATE 


CURSflLO DE BASIC GRATIS, SI COMPflA UN MICROORDENADOR 

OhdknADORES' Specirun. Sprc[*,iVid!ea Amlfand, Owe. iJOS pta* 4> 

iMP^ESOftAS Sljir Nff* Print Sn-ihoiMui OcvJe 774 plu-i ai Monrtortt* Acce»ono'> 


1 WO 0l*5 

1 WO clas 

2 200 p\*h 

1 900 pIas 

3 900 pljv 


AMPUACIONES DE MEMORIA 

Emtitii cCHiUd reomboiso, o falbri conlcwmado CJSiiti 5 i Toll 242 24 ?1 20013 'MADRID NKfViUrm df [H^inut 
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VEOCASION 


m IN rS -CAMBlO programas : . 
i (3 Spectrum 4ft K Sabre Wuil. Anl 
i Attack Fred, Alchemist, Scuba Di¬ 
ve. Aiic Atac, etc, Espero contes- 
lacibn por carta o por teidlono Re 
dec TOiei: Liftan Barque de Jas Pal 
meras. 15. us Torres de Cotiitas 
(Murcia) Tfno (968) 62 64 17. 

• COM PRO un ordenadpr perso 
n-.i i Spectrum Ccmoctafe 64. £ 
Arislrad, EconOmicO Uamar por las 
tarries al 734 58 14. Ester 

• (MTERCAMBIO urog imu-, Tir 
go mA$ cte 400 Marta Garcia Vi 
Ha Begoha. 6, 4 9 Haro (la Rtoja) 

• INTERCAM BIG programas pa ¬ 
ra Spectrum In rt 46 K Mas de 200 

1 filutos como-rCialeS. Gabriel S3n- 
i chez Madrid O' Eduardo Toda 46. 
4 ■■ 1 * 0S03t Barcelona 
e «W8I0 p; prismas p,w» /;< 
Spectrum Titulos come relates 
Juan L Dz cte Corcueia Of Riqja 
9 ■ 6b 01005 Vitoria Tfuj. 25 40 
03 

• VENDO para ZX Spectrum 16 
0 48 K Interlace programaofe in- 
oescomp y palanca cte juegos 
Qurckshol I de Spx.rciravideo lodo 
eipq casi nuevo y regalo S [uegos 
para ZX Spectrum Todo por 7.875 
pis (negocsable) Tlno.: 715 30 59 
(tardea) Raul Diaz O Sanente, 59. 
Rbzuoto de Afarcbn 28023 W idnci 
■ CAMRIQ programas pam ZX 

- Spectrum iciegos, utiirdades ces¬ 
sion avertturaft etc Mils dfi 300 !i 
1 tuios comerciates (90% CM), na- 
Cronaies y de importacibn GrabJ- 
Cion gamut izadn FMiciano Milla 

Garcos Pza Jose Antonio, 2 5° & 
4200-1 sona Tina; (975)2237 00 

• CAMBIO piogianias, iinmar ■!■. 

: eties al (91) 208 )$ BG Antonio Her- 
i rtandez 

• CAMBIO programas Spectrum 
mas de 300 iituHoS Jose Luis Ek- 
posilo Crespo O Alta. 46 B. Esc 

' C T A 39008 Santander 

• CAMBIO 400 programs para ei 
Spec)rum 16*48 K Mando lista. Es 
cntjir a Jose Uis Caniero Lorente 
Bda Federico Mayo OF. 2. Jerez 
de ta Frontara (CAdiz) Tfno h 9TvG) 
34 56 68. 

• DESEARIA intercamiMr pioqi-j 
mas de todo trpo para el ZX 
Spectrum de 16 0 48 K, con todos 
los iiscanos cte EspaAa. as> como 
dar a conocer la cteace6n de un 
club cte usual ios en Sevilla Pregun- 
lar por Arberto Mateos Herrera ai 

(954) 45 47 36. o esciibir a la 
ci 1 Bermudez de Castro, 4, Sevilla 
41011 

• CAM Fit AM OS programas p.ir,i 
ei Spectrum de 16 y 48 K. con to- 
da E spate Poseemo© mas de 250 
1 1 tuios, los interesado® escnpir a 
f Vidro Jesus hiernandez Agustin O 

1 Estatba 6, 2° G V&iiadoiid 47006 
Tina 23 96 91 (tiamar cte 3 a 350 
6 do 9 a m. Enviar llstas 

• VENDO ZX Spectrum I6K in- 
led ace 1 y Microdrrve Todo por 
60 OCX) p!S Tambien rncluyo 2 
cintas-casaettes resrtsias manual 


de uso y tibro *Cbmo programar su 
Spectrum*. Jos6 Luis Tfno.; (977) 
22 56 75, Tarragona 

• IT-JTERCAMBIO programas pa¬ 
ra ei Spectrum 1EV48K Im-eresados 
escribir a Antonio Soriano Gonza¬ 
lez O Salamanca, 5 46006 \felen- 
cia Mando iista 

• CAMBIO program's (tuegos o 
apircaciones) para el Spectrum 16 
Cl 48 K Mas de too titulos Pido y 
doy sto Preferi t?;c en Asauftas en 
concrete en Avites Ralaei Sepji- 
veda Berenjena Q La Paz, 28 Bajo 
izda AviiPs (Astunas). 

• IMTERCAMBlO programas pa 
ra Spectrum LurS Tlno 360 42 85 
Valencia 

• ,D0 Soectrun tBK con jai-wtia ptx 
35000 pis Atgato «oo eusa a? prograTw- 
cpn y tens'Lte coo Crogranas F^ia 

to Tfno. 347 01 46 Baseetons 

a DOMPRO Spectrum 16K con 
ma rubles por tSOOOptS Tlno t9i) 
433 SO 64 (Madrid) FranCtSCO Mar¬ 
tinez O Xabta. 7 46010 Valencia 

• fMrERCAMBlOjuegos y uhiida 
des oar a el Spectrum do 16*48 K 
Mas de 200 tilulOS, Como Sabre 
Wuif. Trasmam stop Express etc 
Preguntar oor Antonio SSncnez 
Ruiz Tfnos (968)2980 19 6 8008 

a NTERCAMBIO Cyius Manic 
W riter. SimutedOr cte vuelCt Figtitor 
Pilot, Jet Set, willy Atic Atap IP Pur- 
ga, e;c David Tlno (93)431 05 47 
Barcelona 

■ DAMBlO emisora do 27 Mhz 
St-liken IX 240 canates USB 25B 
AM Faciurn compra por ZX Spec 
trum. otertas a Alejandro Garcia 
Gonzalez G Orense 29-31, 1" 
Dcba Ferrol (La Corufia) Tfno 31 
01 8t 

• CAMBIO por juepo F hobbit, 
uiiodi!? estos Killer KOng Atic Atac 
Froggy. Pheenix. Ajedrez. 
Androirte-2, Tuneies marcianos o 
v/ri*acne Pilar Gonziiez Ca:iej6n 
C- Mc-das. 4 6 Entto 2* Barcelo¬ 
na Tlno 210 13 13 

• CAMBiC :uegos y programas 
para Spectrum de 16/48K TengO 
gran n 6 do juegos y hago Putinas 
grahiic tones Interesados escnhir a 
Antonio Fernandez Barbel G Cat- 
Zfidn do Castro, ft 3* G 04006 Al- 
mGn;s 

• OOMPRO ma--.uai del Spectrum 
un Castellano, un Spectrum 43K y 
un Amplificadoi de sotiida Para 
mas Kiforrnacibn ttamar Tlno i9i) 
fil3 20 ss: Madrid 

• cambio programas para ZX 
Spectrum 48K Mis de 200 titulos 
eomerciales Miguel Buades Sale- 
taa O Solciado Bibtiom Vincens. 
3 9 B C07015 (Fbrto pi) ftima de 
Mallorca. 

• INTERCAM BIO Sol t ware para 
Spectrum 16^48K Interesados 
mandar J&ta Escritur a Carles Jor 
di Fernandez i San Jose Carrel era 
a Gaga 42-2® Guardiola de Ber- 
guedi) i Barcelona), 

• SE VENDE Spectrum 43K. 


praciicamenle nuevo y 15 juegos 
valprados en mis de 20,000 pis 
Manic Miner. Scuba Dive. Jel Pnc, 
etc Todo par 40000 pis Javier 
Tlno 91(404 39 37, (de 7 a 10) 

• VENDO ordenador Sinclair Ql 
a esimnar. provisto de 12 microdn 
ves y cable para impresora 1100OQ 
pis Lorenzo Bundies Tfno 446 88 
29. hoias de olicina 

• ME GUSTARlA contact a r con 
usuarios del Specirum en Burgos 
capital. Uamar ei 2019 72. (a par- 
lir de las 9 noebe) Preguntar por 
Angel 

e CAMBlO programasde48K.de 
see especiaimente de aventuras 
graheas a ser posible con msffuc- 
Cines (sdto 49K). Vicente Sapid a 
Ekildcvi O Sam Roc 13 2Z Sueca 
(Valencia), 

• VENDO el aguiente material de 
HEWLETT PACKARD. 1- 82153 A 
LSpiz optico 1- 82160 A HP • IL In 
terface v- 82i6\ A Gasseut <Ap'.- 
do 1- 82162 A Imoresoiy lermca 
1-82163 A Video Interlace 1-82181 
A Mbduio ext de memoria. Todo 
eiio por el precio de 200000 pts. 
y regale mbduio estadistico y de 
juegos asi como Jidtos y dxumen- 
taciOn Llama r al letefcmo 91*457 44 
29. par las noches JosS M* Julia 

• VENDO Spectrum 48K. con gn- 
rantia hasta a brit/85, impecabte, 
con conexionesi, translo-rmedor y 
manual en casteltena Regaio cm 
ta con 20 proyramas originates 2 
iibos sobre ei Specirum. asi como 
todas las revistas ZX (esioy susen 
to hasta mayo/85). y MICRO- 
HQBBY TbdO ello per 30000 pis 
Miguel Ortiz Caslitlo Pza Mayor, 3 
Uiria iVasenciai Tfno. 967376 is 49. 

• INTEFtCAMBIO programas ZX 
Spectrum 16 d 40K Mbs de 125 
crogramas (Match port. Qiimpscbn 
Full throttle. Hunter teller.) Escribir 
a hermanos Arroyo Anerrida de los 
Plaleros. 8-4 °B o lljmjf al 22 83 
42 (955) preguntando por Alberto 
ftardes) 

• iNTERCAMGtO programas, 
tambten los cambe por perif&ricos 
Tengo 400 C6sar Garcia G Am- 
brosib Meabe 5-2® izq Durango 
(Vizcaya) Tlno 94/661 22 97, 

• INTEFiCAMBiO programas pa 
ra Spectrum, especialmente jue¬ 
gos Dtspongo alrededor de iOO 
programas eomerciales Inleresa- 
dos escnbir a. Miguel Sanchis Av- 
da Ribera Bauta, 6, 46000 Corbe 
ra (\taiencia) 

• INTERCAM0IO todo lipode pro- 
gramas e inlormacidn con usuanos 
del Spectrum Envte iista Escrihr 
a Pare Anton AmadO Monsano G 
Sant Fere n* 2 Vitatrenca del Rb- 
nedSs (Barcelona). 

• CAMBIO programas de juegos 
y utiidades para el Spectrum Ten- 
go tos mejores (Bandera. Aic Atac 
Flighter PSlol. Tansword-Contest 
etc) Zona de Bifbao A las mafia 
nas preguntar per Lukan Tfno 415 
41 98 
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ZX SPECTRUM 


Vi dJifxianiio* drl Pltn Miritmil 
jjara Mirm<Lrivr. 

* Archivci de Cuentas 
256 etas. 

* Arthivo de Asientos 
1024 asientos. 


* fctracio de cuenlas, 

* Balances de Sumas 
> said os. 


* Balances de SUuacidn. 

* Versirmes para 1 6 2 
microdrives. 




Avtiru4* m M«drtt 
iftwo, 

551 12 

Mrtrxl 2*007 


MICRO-1 

oferta SPECTRUM 48 K 

4 8 CIPJTAS 34.700 

COM 6 WIESES 0E GARANTIA 
SOFTWARE 20% DESCUENTO 

jVEN A VERNOS! 

C/JORGE JUAM, N * 116 
(METRO O'DON ELM 
MADRID, TFNO 252 88 11 


A*Oio4i 

SBeac \W 
H/VJEMOS FACIL 
LA INETJRMATJCA 

■ SlMCLAPfl *EFSCI«JW»MO 
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ANUNCIESE 

EN 

MODULOS 

Tels.: 733 59 04 - 733 50 12 
Senorita Marisa 


34 MICROHOBBY 
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BRAVO MURILLO, 2 (aporc grotuilo en C/ Magallanes, 1). Tel : 446 62 31 
DJEGO DE LEON, 25 (aporc gray to en 0/ Nunez de Balboa, 114), Tel: 261 88 01 MADRID 





















